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Preface 

This manual references to information contained in this manual is provided as a DOS/VSE 
serviceability aid and is, therefore, a summary of other DOS/VSE documentation. These manuals 
are intended for use by persons involved in program support. 

This manual does not contain information on DOS/VSE Advanced FuTiCtions. This information 
represent Ucensed material and must be ordered separatly. 

it will be distributed as System Library Supplement which logically fit into this manual. 

The volume contains following information: 

Volume 1,SY33-8571: 

Chapter I : General Information 

II : DOS/VSE General Information 

III: DOS/VSE IOCS (General, SAM, DAM, ISAM) 

IV: DOS/VSE Supervisor Control Blocks and Areas 

V : DOS/VSE Service Aids 

If there is any discrepancy between the information contained in this manual and the DOS/VSE 
optional programming material (e.g., PLMs and listings), the latter is assumed to be correct. 

Eighth Edition (February, 1979) 

This is a major revision of and obsoletes, SY33-8571-6. This edition applies to the Disk Operating 
System/Virtual Storage Extended (DOS/VSE) and to all subsequent versions and releases until 
otherwise indicated in new editions or Technical Newsletters. Changes are continually made to 
the information herein; before using this publication in connection with the operation of IBM 
systems, consult the latest System 1370 Bibliography, GC20-0001 , for the editions that are app- 
licable and current. 

Request for copies of IBM publications should be made to your IBM representative or to the 
IBM branch office serving your locality. 

A handbook-sized binder, FE Part Number 453559, may be purchased from IBM. Customers may 
order it through their IBM marketing representative. IBM personnel should order it as an FE part 
from Mechanicsburg. 

This manual has been prepared by WT-DP/CE Technical Operations, 7030 Boeblingei), Germany. 

A form for readers' comments is provided at the back of this publication. If the form has been 
removed, comments may be sent to the above address. Comments become the property of IBM. 

© Copyright International Business Machines Corporation, 1973, 1974, 1975, 1976, 1977, 
1978,1979. 



TABLE OF CONTENTS (. . . . Cont'd) 

Chapter IV 

Interval Timer Table 63 

Task Timer Option Table 63 

Interval Timer Request Table 64 

Abnormal Termination Table 65 

Page Fault Handling Overlap Table 66 

Job Accounting Interface Common Table 67 

Job Accounting Interface Partition Table 68 

ASCII ABCDIC Translation Tables 69 

Segment and Page Table 74 

Page Data Set Table (DPDTAB) 75 

Page-In Queue Entry (PGQUI) 76 

Page-Out Queue Entry (PGQUO) 76 

Page Frame Table Entry (PFTE) 77 

PAGETAB 78 

Translation Control Block (TCB) 79 

Copy Blocks 80 

Replica Block, Didal Block and Entry 83 

Converting Virtual to Real Address 84 

Page Data Set Format 85 

Replica Header Blocks, Layout 86 

Resource Usage Record Table (RURTAB) 87 

Anchor Table (ANCHTAB) 89 

Fetch/Load Control Blocks 90 

Layout of Shared Virtual Area (SVA) 91 

Layout of Directory Entry 92 

Routine Identifiers (RID) 93 

VTAM Address Vector Table (ISTAVT) 94 

Chapter V DOS/VSE Service Aids 

OLTEP 01 

EREP 04 

SDAID 11 

MSHP 17 

PDZAP 67 

DOSVSDMP 69 



TABLE OF CONTENTS 

Chapter I General Information 

Machine Instructions 01 

Extended iVINEMONIC Instruction Codes 04 

Assembler Instructions 05 

Condition Codes 06 

Code Translation Table os 

Machine Instructions Formats 12 

Control Register Allocation 13 

Assignment of Control Register Field 13 

Permanent Main Storage Assignment 14 

Program Status Word (PSW) 16 

Channel Address Word (CAW) 17 

Channel Command Word (CCW) 17 

Channel Status Word (CSW) 17 

Limited Channel Logout 18 

Machine Check Interruption Code 18 

Codes for Program Interruptions 19 

Codes for External Interruptions 19 

Codesfor Input/Output Interruptions 19 

Codes for Supervisor Call Interruptions 19 

Channel Commands 19 

Hexadecimal and Decimal Conversion 23 

Sense Information Summary 24 

Chapter II DOS/VSE General Information 

IPL Control Statements 01 

Job Control- and Attention Routine Commands 05 

Linicage Editor Control Statements 22 

Librarian 24 

ESERV 33 

LSERV 35 

Supervisor Macros 36 

Device Type Codes 42 

Format of ESD CARD 44 

TXT CARD 44 

RLDCARD 45 

END CARD 45 

REP CARD 45 

Chapter III DOS/VSE IOCS (General/SAM/DAM/ISAM) 

Standard Volume Labels, Tape or DASD 01 

Standard Magnetic Tape File Label 03 

Standard DASD File Label - Format 1 07 

Standard DASD File Label - Format 2 1 1 

Standard DASD File Label - Format 3 15 

Standard DASD File Label - Format 4 16 

Standard DASD File Label - Format 5 19 

Label Information Cylinder 20 

LIOCS Module Name Versus Options 21 

DTFCD (Reader) 28 

DTFCD (Punch) 32 

DTFCD (Combined Reader/Punch) 34 

DTFPR 35 

DTFCN 37 

DTFDR 38 

DTFOR 39 

DTFMR 41 

DTFMT (Data Files) 44 

DTFMT (Work Files) 52 

DTFSD (Data Files) 53 

DTFSD (Work Files) 60 

DTFDA 62 

DTFIS (Load) 67 

DTFIS (ADD) 71 

DTFIS (RETRVE, RANDOM) 77 

DTFIS (RETRVE.SEQNTL) 81 



TABLE OF CONTENTS (.... Cont'd) 

Chapter III 

DTFDU 91 

DTFPH (Magnetic Tape) 93 

DTFPH (Sequential Disk) 94 

DTFPH (DAM Files) 96 

DTFPH (Diskette) 97 

DTFDI 99 

DTFCP {Disk=Yes) 101 

DTFCP (Disk=No) 104 

DTFCP (Disk=Parameter Omitted) 106 

DTF - Table Types 108 

RPS DTF/Module Relationship 110 

RPS DTF - Extention HI 

Chapter IV DOS/VSE Supervisor Control and Areas 

Supervisor Storage Allocation 01 

Supervisor Calls 02 

Command Control Block (CCB) 05 

Input/Output Request Block (lORB) 08 

Storage Management Control Block (SMCB) 10 

System Control Program Communication Region (SYSCOM) 11 

Partition Communication Region 17 

Partition Identification Key (PI K) 25 

Task Interrupt Key (TIK) 25 

Logical Transient Owner Identifikdtion Key (LIK) 25 

Logical Transient Key (LTK) 25 

RAS Linkage Area 26 

System Task Blocks 27 

Program Information Block (PIB) 28 

Program Information Block Extension 31 

Save Areas 32 

I/O Table Interrelationship 33 

Logical Unit Block (LUB) 34 

Physical Unit Block (PUB) 35 

Physical Unit Block Ownership Table 36 

Job Information Block (JIB) 37 

Channel Queue Table (CHANQ) 38 

Channel Control Table (CHNTAB) 39 

Track Hold Table (THTAB) 40 

Console Buffering Table 40 

Line Mode Table 41 

Relationship of Control and Workblocks for Channel Program Fixing 42 

Fixlist Header Block (FHB) Layout 43 

Rix Request Block (FRB) 44 

Fix list Block (FLB) Layout 44 

Locate List Block, Layout 45 

Line Pointer Blocks, Layout 45 

Emulator ECB Table (EUECBTAB) 46 

FIXWTAB 46 

Density Data 46 

Event Control Block (ECB) 47 

Resource Control Block (RCB) 47 

Cross Partition ECB (XECB) Table 47 

Disk Information Block (DIB) Table 48 

MICR DTF Addresses and Pointers 50 

Error Recovery Procedure Information Block (ERPIB) 51 

Error REcovery Block and Error Queue Entry 52 

Cancel Codes and Messages 53 

PUB2 Entry Addressing 55 

PUB2 Table 56 

Recorder File Table (RF TABLE) 59 

CRT Constant Table (CRTTAB) 61 

Program Check Option Table 62 

Operator Communication Table 62 



CHAPTER I 

GENERAL INFORMATION 



CHAPTER II 

OOS/VSE GENERAL INFORMATION 



CHAPTER III 

DOS/VSE IOCS (GENERAL/SAM/DAM/ISAM) 



CHAPTER IV 

DOS/VSE SUPERVISOR CONTROL BLOCKS AND AREAS 



CHAPTER V 

DOS/VSE SERVICE AIDS 



I 
I 
I 
I 
I 



CHAPTER I 

GENERAL INFORMATION 



MACHINE INSTRUCTIONS 





Mne- 


Op 






Name 


monic 


Code 


Format 


Operands 


Add (c) 


AR 


1A 


RR 


R1,R2 


Add (c) 


A 


5A 


RX 


R1,D2(X2,B2) 


Add Decimal (c) 


AP 


FA 


SS 


D1(L1,B1),D2(L2,B2) 


Add Halfword (c) 


AH 


4A 


RX 


R1,D2{X2,B2) 


Add Logical (c) 


ALR 


IE 


RR 


R1,R2 


Add Logical (c) 


AL 


5E 


RX 


R1,D2(X2,B2) 


AND(c) 


NR 


14 


RR 


R1,R2 


AND (c) 


N 


54 


RX 


R1,D2(X2,B2) 


AND (c) 


Nl 


94 


SI 


D1(B1),12 


AND (c) 


NC 


D4 


SS 


D1(L,B1),D2(B2) 


Branch and Link 


BALR 


05 


RR 


R1,R2 


Branch and Link 


BAL 


45 


RX 


R1,D2(X2,B2) 


Branch on Condition 


BCR 


07 


RR 


M1,R2 


Branch on Condition 


BC 


47 


RX 


M1,D2(X2,B2) 


Branch on Count 


BCTR 


06 


RR 


R1,R2 


Branch on Count 


BCT 


46 


RX 


R1,D2(X2,B2) 


Branch on Index High 


BXH 


86 


RS 


R1,R3,D2(B2) 


Branch on Index Low or Equal 


BXLE 


87 


RS 


R1,R3,D2(B2) 


Clear I/O 


CIRIO 


9D01 


s 


D2(B2) 


Clear Page 


CLRP 


B215 


S 




Compare (c) 


CR 


19 


RR 


R1,R2 


Compare (c) 


c 


59 


RX 


R1,D2(X2,B2) 


Compare and Swap 


CS 


BA 


RS 


R1,R3,D2,(B2) 


Compare Decimal (c) 


CP 


F9 


SS 


D1(L1,B1),D2(L2,B2) 


Compare Double and Swap 


CDS 


BB 


RS 


R1,R3,D2,(B2) 


Compare (c) 


CR 


19 


RR 


R1,R2 


Compare (c) 


C 


59 


RX 


R1,D2(X2,B2) 


Compare Decimal (c) 


CP 


F9 


SS 


D1(L1,B1),D2(L2,B2) 


Compare Halfword (c) 


CH 


49 


RX 


R1,D2(X2,B2) 


Compare Logical (c) 


CLR 


15 


RR 


R1,R2 


Compare Logical (c) 


CL 


55 


RX 


R1,D2(X2,B2) 


Compare Logical (c) 


CLC 


D5 


SS 


D1,(L,B1),D2(B2) 


Compare Logical (c) 


CLI 


95 


SI 


D1(B1),I2 


Compare Logical Characters 


CLM 


BD 


RS 


R1,M3,D2(B2) 


under Mask (c) 










Compare Logical Long (c) 


CLCL 


OF 


RR 


R1,R2 


Connect Page 


CTP 


BO 


RS 


R1,M3,D2(B2) 


Convert to Binary 


CVB 


4F 


RX 


R1,D2(X2,B2) 


Convert to Decimal 


CVD 


4E 


RX 


R1,D2(X2,B2) 


Deconfigure Page 


DEP 


B21B 


S 




Diagnose (p) 




83 


SI 




Disconnect Page 


DCTP 


B21C 


S 




Divide 


DR 


ID 


RR 


R1,R2 


Divide 


D 


5D 


RX 


R1,D2(X2,B2) 


Divide Decimal 


DP 


FD 


SS 


D1(L1,B1),D2(L2,B2) 


Edit (c) 


ED 


DE 


SS 


D1(L,B1),D2(B2) 


Edit and IVIark (c) 


EDMK 


DF 


SS 


D1(L,B1),D2(B2) 


Exclusive OR (c) 


XR 


17 


RR 


R1,R2 


Exclusive OR (c) 


X 


57 


RX 


R1,D2(X2,B2) 


Exclusive OR (c) 


XI 


97 


SI 


D1(B1),I2 


Exclusive OR (c) 


XC 


D7 


SS 


D1(L,B1),D2(B2) 


Execute 


EX 


44 


RX 


R1,D2(X2,B2) 


Halt I/O (c,p) 


HIO 


9E00 


S 


DKBI) 


Halt Device (c,p) 


HDV 


9E01 


S 


D1(B1) 


Insert Character 


IC 


43 


RX 


R1,D2(X2,B2) 


Insert Characters under Mask (c) 


ICM 


BF 


RS 


R1,M3,D2(B2) 


Insert Page Bits 


IPB 


B4 


s 




Insert Storage Key (p) 


ISK 


09 


RR 


R1,R2 


Insert PSW Key 


IPK 


B20B 


S 




Load 


LR 


18 


RR 


R1,R2 


Load 


L 


58 


RX 


R1,D2(X2,B2) 


Load Address 


LA 


41 


RX 


R1,D2(X2,B2) 


Load and Test (c) 


LTR 


12 


RR 


R1,R2 


Load Complement (c) 


LCR 


13 


RR 


R1,R2 


Load Control (p) 


LCTL 


B7 


RS 


R1,R3,D2(B2) 


Load Frame Index 


LFI 


B8 


RS 


R1,M3,D2(B2) 


Load Halfword 


LH 


48 


RX 


R1,D2(X2,B2) 


Load Multiple 


LM 


98 


RS 


R1,R3,D2(B2) 


Load Negative (c) 


LNR 


11 


RR 


R1,R2 


Load Positive (c) 


LPR 


10 


RR 


R1,R2 



I 



MACHINE INSTRUCTIONS (. . . . Cont'd) 





Mne- 


Op 






Name 


monic 


Code 


Format 


Operands 


Load PSW (n.p) 


LPSW 


82 


SI 


DKBI) 


Load Real Address (c,p) 


LRA 


B1 


RX 


R1,D2(X2,B2) 


Monitor Call (m) 


MC 


AF 


SI 


D1{B1),I2 


Make Addressable 


MAD 


B21D 


S 




Make Unaddressabie 


MUN 


B21E 


S 




Move 


MVI 


92 


SI 


D1(B1),I2 


Move 


MVC 


D2 


SS 


D1(L,B1),D2{B2) 


Move Long (c) 


MVCL 


OE 


RR 


R1,R2 


Move Numerics 


MVN 


D1 


SS 


D1(L,ei),D2(B2) 


Move with Offset 


MVO 


F1 


SS 


D1(L1,B1),D2(L2,B2) 


Move Zones 


MVZ 


D3 


SS 


D1(L,B1),D2(B2) 


Multiply 


MR 


1C 


RR 


R1,R2 


Multiply 


M 


5C 


RX 


R1,D2{X2.B2) 


Multiply Decimal 


MP 


FC 


SS 


D1{L1,B1),D2(L2,B2) 


Multiply Halfword 


MH 


4C 


RX 


R1,D2(X2,B2) 


OR (c) 


OR 


16 


RR 


R1,R2 


OR(c) 





56 


RX 


R1,D2(X2,B2) 


OR{c) 


01 


96 


SI 


D1(B1),I2 


OR(c) 


OC 


D6 


SS 


D1(L, B1),D2(B2) 


Pack 


PACK 


F2 


SS 


D1(L1,B1),D2(L2,B2) 


Purge Table (p) 


PTLB 


B20D 


s 




Reset Reference Bit (c,p) 


RRB 


B213 


S 


DKBI) 


Retrieve Status and Page 


RSP 


D8 


SS 


D1{L1,B1),D2{L2,B2) 


Set Clock (c,p) 


SCK 


B204 


S 


DKBI) 


Set Clock Comparator (p) 


SCKC 


B206 


S 


DKBI) 


Set CPU Timer (p) 


SPT 


B208 


S 


DKBI) 


Set Page Bits 


SPB 


B5 


RS 


R1,D2([B2) 


Set Program Mask (n) 


SPM 


04 


RR 


R1 


Set Storage Key (p) 


SSK 


08 


RR 


R1,R2 


Set PSW Key from Address 


SPKA 


B20A 


S 




Set System Mask (p) 


SSM 


80 


SI 


DKBI) 


Shift and Round Decimal (c) 


SRP 


FO 


SS 


DKL1,B1),D2(B2),I3 


Shift Left Double (c) 


SLDA 


8F 


RS 


R1,D2(B2) 


Shift Left Double Logical 


SLDL 


8D 


RS 


R1,D2{B2) 


Shift Left Single (c) 


SLA 


8B 


RS 


R1,D2(B2) 


Shift Left Single Logical 


SLL 


89 


RS 


R1,D2(B2) 


Shift Right Double (c) 


SRDA 


8E 


RS 


R1,D2{B2) 


Shift Right Double Logical 


SRDL 


8C 


RS 


R1,D2(B2) 


Shift Right Single (c) 


SRA 


8A 


RS 


R1,D2(B2) 


Shift Right Single Logical 


SRL 


88 


RS 


R1,D2(B2) 


Start I/O (c,p) 


SIO 


9C00 


S 


DKBI) 


Start I/O Fast Release (c,p) 


SIOF 


9C01 


S 


DKBI) 


Store 


ST 


50 


RX 


R1,D2(X2,B2) 


Store Capacity Counts 


STCAP 


B21F 


S 




Store Channel ID (c,p) 


STIDC 


B203 


s 


DKBI) 


Store Character 


STC 


42 


RX 


R1,D2(X2,B2) 


Store Characters under Mask 


STCM 


BE 


RS 


R1,M3,D2(B2) 


Store Clock (c) 


STCK 


B205 


S 


DKBI) 


Store Clock Comparator (p) 


STCKC 


B207 


a 


DKBI) 


Store Control (p) 


STCTL 


B6 


RS 


R1,R3,D2(B2) 


Store CPU ID (p) 


STIDP 


B202 


S 


DKBI) 


Store CPU Timer (p) 


STPT 


B209 


s 


DKBI) 


Store Halfword 


STH 


40 


RX 


R1,D2(X2,B2) 


Store Multiple 


STM 


90 


RS 


R1,R3,D2(B2) 


Store then AND System Mask (p) 


STNSM 


AC 


SI 


D1{B1)I2 


Store then OR System Mask (p) 


STOSM 


AD 


SI 


D1(B1),I2 


Subtract (c) 


SR 


IB 


RR 


R1,R2 


Subtract (c) 


S 


5B 


RX 


R1,D2(X2,B2) 


Subtract Decimal (c) 


SP 


FB 


SS 


DKL1,B1),D2(L2,B2) 


Subtract Halfword (c) 


SH 


4B 


RX 


R1,D2(X2,B2) 


Subtract Logical (c) 


SLR 


IF 


RR 


R1,R2 


Subtract Logical (c) 


SL 


5F 


RX 


R1,D2(X2,B2) 


Supervisor Call 


SVC 


OA 


RR 


1 


Test and Set (c) 


TS 


93 


SI 


DKBI) 


Test Channel (c,p) 


TCH 


9F 


SI 


DKBI) 


Test I/O (c,p) 


TIO 


9D 


SI 


DKBI) 


Test under Mask (c) 


TM 


91 


SI 


DKB1),I2 


Translate 


TR 


DC 


SS 


DKL,B1),D2(B2) 


Translate and Test (c) 


TRT 


DD 


SS 


D1(L,B1),D2(B2) 


Unpack 


UNPK 


F3 


SS 


DKL1,B1),D2(L2,B2) 


Zero and Add Decimal (c) 


ZAP 


F8 
1-02 


SS 


D1{L1,B1),D2(L2,B2) 



MACHINE INSTRUCTIONS (. . . . Cont'd) 



Floating Point Instructions 





Mne- 


Op 






Name 


monic 


Code 


Format 


Operands 


Add Normalized, Extended (c,x) 


AXR 


36 


RR 


R1,R2 


Add Normalized, Long (c) 


ADR 


2A 


RR 


R1,R2 


Add Normalized, Long (c) 


AD 


6A 


RX 


R1,D2(X2,82) 


Add Normalized, Short (c) 


AER 


3A 


RR 


R1,R2 


Add Normalized, Short (c) 


AE 


7A 


RX 


R1,D2(X2,82) 


Add Unnormalized, Long (c) 


AWR 


2E 


RR 


R1,R2 


Add Unnormalized, Long (c) 


AW 


6E 


RX 


R1,D2(X2,B2) 


Add Unnormalized, Short (c) 


AUR 


3E 


RR 


R1,R2 


Add Unnormalized, Short (c) 


AU 


7E 


RX 


R1,D2(X2,B2) 


Compare, Long (c) 


CDR 


29 


RR 


R1,R2 


Compare, Long (c) 


CD 


69 


RX 


R1,D2(X2,B2) 


Compare, Short (c) 


CER 


39 


RR 


R1,R2 


Compare, Short (c) 


CE 


79 


RX 


R1,D2(X2,82) 


Divide, Long 


DDR 


2D 


RR 


R1,R2 


Divide, Long 


DD 


6D 


RX 


R1,D2(X2,B2) 


Divide, Short 


DER 


3D 


RR 


R1,R2 


Divide, Short 


DE 


7D 


RX 


R1,D2(X2,82) 


Halve, Long 


HDR 


24 


RR 


R1,R2 


Halve, Short 


HER 


34 


RR 


R1,R2 


Load and Test, Long (c) 


LTDR 


22 


RR 


R1,R2 


Load and Test, Short (c) 


LTER 


32 


RR 


R1,R2 


Load Complement, Long (c) 


LCDR 


23 


RR 


R1,R2 


Load Complement, Short (c) 


LCER 


33 


RR 


R1,R2 


Load, Long 


LDR 


28 


RR 


R1,R2 


Load, Long 


LD 


68 


RX 


R1,D2(X2,B2) 


Load Negative, Long (c) 


LNDR 


21 


RR 


R1,R2 


Load Negative, Short (c) 


LNER 


31 


RR 


R1,R2 


Load Positive, Long (c) 


LPDR 


20 


RR 


R1,R2 


Load Positive, Short (c) 


LPER 


30 


RR 


R1,R2 


Load Rounded, Extended t Long (x 


LRDR 


25 


RR 


R1,R2 


Load Rounded, Long to Short (x) 


LRER 


35 


RR 


R1,R2 


Load, Short 


LER 


38 


RR 


R1,R2 


Load, Short 


LE 


78 


RX 


R1,D2(X2,B2) 


Multiply, Extended (x) 


MXR 


26 


RR 


R1,R2 


Multiply, Long 


MDR 


2C 


RR 


R1,R2 


Multiply, Long 


MD 


6C 


RX 


R1,D2(X2,B2) 


Multiply, Long/Extended (x) 


MXDR 


27 


RR 


R1,R2 


Multiply, Long/Extended (x) 


MXD 


67 


RX 


R1,D2(X2,82) 


Multiply, Short 


MER 


3C 


RR 


R1,R2 


Multiply, Short 


ME 


7C 


RX 


R1,D2(X2,82) 


Store, Long 


STD 


60 


RX 


R1,D2(X2,82) 


Store, Short 


STE 


70 


RX 


R1,D2(X2,82) 


Subtract Normalized, Ext'd (c,x) 


SXR 


37 


RR 


R1,R2 


Subtract Normalized, Long (c) 


SDR 


2B 


RR 


R1,R2 


Subtract Normalized, Long (c) 


SD 


68 


RX 


R1,D2(X2,B2) 


Subtract Normalized, Short (c) 


SER 


38 


RR 


R1,R2 


Subtract Normalized, Short (c) 


SE 


78 


RX 


R1,D2(X2,82) 


Subtract Unnormalized, Long (c) 


SWR 


2F 


RR 


R1,R2 


Subtract Unnormalized, Long (c) 


SW 


6F 


RX 


R1,D2(X2,82) 


Subtract Unnormalized, Short (c) 


SUR 


3F 


RR 


R1,R2 


Subtract Unnormalized, Short (c) 


SU 


7F 


RX 


R1,D2(X2,B2) 



I 



(a) Direct Control Feature 
(c) Condition Code is set 
(m) Monitoring Feature 



(n) New Condition Code is loaded 

(p) Privileged Instruction 

(x) Extended precision floating point feature 



EXTENDED MNEMONIC INSTRUCTION CODES 



Extended Code 



Machine Instruction 



B 


D2(X2,B2) 


BC15, 


D2(X2,B2) 


Branch Unconditionally 


BR 


R2 


BCR 15, 


R2 


Branch Unconditionally 


NOP 


D2(X2,B2) 


BCO, 


D2(X2,B2) 


No Operation 


NOPR 


R2 


BCRQ, 


R2 


No Operation (RR) 


AFTEF 


\ COMPARE INSTRUCTIONS (A:B) 




BH 


D2(X2,B2) 


BC2, 


D2(X2,B2) 


Branch on A High 


BL 


D2(X2,B2) 


BC4, 


D2(X2,B2) 


Branch on A Low 


BE 


D2(X2,B2) 


BC8, 


D2(X2,B2) 


Branch on A equal B 


BNH 


D2(X2,B2) 


BC13, 


D2(X2,B2) 


Branch on A not High 


BNL 


D2(X2,B2) 


BC11, 


D2(X2,B2) 


Branch on A not Low 


BNE 


D2(X2,B2) 


BC7, 


D2(X2,B2) 


Branch on A not Equal E 


AFTER ARITHMATIC INSTRUCTIONS 




BO 


D2(X2,B2) 


BC1, 


D2(X2,B2) 


Branch on Overflow 


BP 


D2(X2,B2) 


BC2, 


D2(X2,B2) 


Branch on Plus 


BM 


D2(X2,B2) 


BC4, 


D2(X2,B2) 


Branch on Minus 


BZ 


D2(X2,B2) 


BC8, 


D2(X2,B2) 


Branch on Zero 


BNP 


D2(X2,B2) 


BC13, 


D2(X2,B2) 


Branch on not Plus 


BNM 


D2(X2,B2) 


BC11, 


D2(X2,B2) 


Branch on not Minus 


BNZ 


D2(X2,B2) 


BC7, 


D2(X2.B2) 


Branch on not Zero 


AFTEF 


\ TEST UNDER MASK INSTRUCTIONS 




BO 


D2{X2,B2) 


BC1, 


D2(X2,B2) 


Branch if Ones 


BM 


D2(X2,B2) 


BC4, 


D2(X2,B2) 


Branch if Mixed 


BZ 


D2(X2,B2) 


BC8, 


D2(X2,B2) 


Branch if Zero's 


BNO 


D2(X2,B2) 


BC 14, 


D2(X2,B2) 


Branch if not Ones 



CNOP ALIGNMENT 



Double Word | 


Word 


Word 


Half Word Half Word 


Half Word | Half Word 


Byte Byte Byte Byte [ Byte Byte j Byte Byte 


\_ \^ x^ x_ 

0,4 2,4 0,4 2,4 
0,8 2,8 4,8 6,8 



EDIT AND EDMK PATTERN CHARACTERS (In Hex) 

20 - Digit selector 40 - Blank 5C - Aterisk 

21 -Start of significance 4B- Period 6B - Comma 

22 - Field separator 5B - Dollar sign C3D9 - CR 



ASSEMBLER INSTRUCTIONS 

Function 
Data Definition 



Program Sectioning 
and Linking 



Base Register Assignment 

Control of listings 



Program Control 



IVIacro Definition 



Conditional Assembly 



CCW 

START 

CSECT 

DSECT 

COM 

ENTRY 

EXTRN 

WXTRN 

USING 
DROP 

TITLE 
EJECT 
SPACE 
PRINT 

ICTL 

ISEQ 

PUNCH 

REPRO 

ORG 

EQU 

LTORG 

CNOP 

COPY 

END 

MACRO 
MNOTE 
MEXIT 
MEND 

ACTR 

AGO 

AIF 

ANOP 

GBLA 

GBLB 

GBLC 

LCLA 

LCLB 

LCLC 

SETA 

SETB 

SETC 



Define Constant 

Define Storage 

Define Channel Command Word 

Start Assembly 

Identify Control Section 

Identify Dummy Section 

Identify blank common Control Section 

Identify Entry Point Symbol 

Identify External Symbol 

Identify weak External Symbol 

Use Base Address Register 
Drop Base Address Register 

Identify Assembly Output 
Start new Page 
Space Listing 
Print Optional Data 

Input Format Control 
Input Sequence Checking 
Punch a Card 
Reproduce following Card 
Set Location Counter 
Equate Symbol 
Begin Literal Pool 
Conditional No-Operation 
Copy predefined Source Coding 
End Assembly 

Macro Definition Header 
Request for Error Message 
Macro Definition Exit 
Macro Definition Trailer 

Conditional Assembly Loop Counter 
Unconditional Branch 
Conditional Branch 
Assembly No-Operation 
Define global SETA Symbol 
Define global SETB Symbol 
Define global SETC Symbol 
Define local SETA Symbol 
Define local SETB Symbol 
Define local SETC Symbol 
Set Arithmetic Variable Symbol 
Set Arithmetic 
Set Character Variable Symbol 



I 



SUMMARY OF CONSTANTS 





Implied 








Type 


Length 
Bytes 


Alignment 


Format 


Truncation 
Padding 


C 


- 


Byte 


Characters 


Right 


X 


- 


Byte 


Hexadecimal Digits 


Left 


B 


- 


Byte 


Binary Digits 


Left 


F 


4 


Word 


Fixed-point Binary 


Left 


H 


2 


Halfword 


Fixed-point Binary 


Left 


E 


4 


Word 


Short Floating-point 


Right 


D 


8 


Doubleword 


Long Floating-point 


Right 


L 


16 


Doubleword 


Extended Floating-point 


Right 


P 


— 


Byte 


Packed Decimal 


Left 


Z 


- 


Byte 


Zoned Decimal 


Left 


A 


4 


Word 


Value of Address 


Left 


Y 


2 


Halfword 


Value of Address 


Left 


S 


2 


Halfword 


Address in Base-Displacement form 


- 


V 


4 


Word 


Externally defined Address Value 


Left 



CONDITION CODES 



Condition Code Setting 





1 


2 


3 


iWask Bit Position 


8 


4 


2 


1 


Floating Point Arithmetic 










Add Normalized S/L/E 


zero 


<zero 


>zero 


_ 


Add Unnormalized S/L 


zero 


<zero 


>zero 


— 


Compare S/L (A:B) 


equal 


A low 


A high 


_ 


Load and Test S/L 


zero 


<zero 


>zero 


— 


Load Complement S/L 


zero 


<zero 


>zero 


_ 


Load Negative S/L 


zero 


<zero 


- 


— 


Load Positive S/L 


zero 


— 


>zero 


— 


Subtract Normalized S/L/E 


zero 


<zero 


> zero 


_ 


Subtract Unnormalized S/L 


zero 


<zero 


>zero 


- 


Fixed Point and Decimal Arithmetic 








Add H/F/Dec. 


zero 


<zero 


>zero 


overflow 


Add Logical 


zero, 


not zero. 


zero. 


not zero. 




no carry 


no carry 


carry 


carry 


Compare H/F/Dec. {A:B) 


equal 


Alow 


A high 


— 


Compare and Swap/Double 


equal 


not equal 


_ 


- 


Load and Test 


zero 


<zero 


>zero 


— 


Load Complement 


zero 


<zero 


>zero 


overflow 


Load Negative 


zero 


<zero 


— 


— 


Load Positive 


zero 


- 


>zero 


overflow 


Shift and Round Decimal 


zero 


<zero 


> zero 


overflow 


Shift Left Single/Double 


zero 


<zero 


>zero 


overflow 


Shift Right Single/Double 


zero 


<zero 


>zero 


- 


Subtract H/F/Dec. 


zero 


<zero 


>zero 


overflow 


Subtract Logical 


- 


not zero. 


zero , 


not zero. 






no carry 


carry 


carry 


Zero and Add 


zero 


<zero 


>zero 


overflow 


Logical Operations 










AND 


zero 


not zero 


_ 


^ 


Compare Logical (A:B) 


equal 


A low 


A high 


— 


Edit 


zero 


<zero 


>zero 


— 


Edit and Mark 


zero 


<zero 


>zero 


— 


Exclusive OR 


zero 


not zero 


_ 


_ 


Insert Characters under Mask 


all zero 


1«bit one 


1« bit zero 


— 


Move Long (A:B) 


equal 


A low 


A high 


overlap 


OR 


zero 


not zero 


- 


— 


Test under Mask 


zero 


mixed 


- 


one 


Translate and Test 


zero 


incomplete 


complete 


- 


Input/Output Operations 










Clear I/O 


no oper in 


CSW stored 


Chan busy 


not oper 


Halt I/O, Halt Device 


interruption 
pending 


1 CSW stored 


See Prin Op 


not oper 


Start I/O, SIOF 


started 


CSW stored 


busy 


not oper 


Store Channel ID 


ID stored 


CSW stored 


1 D not stored 


not oper 


Test I/O 


available 


CSW stored 


busy 


not oper 


Test Channel 


available 


interruption 
pending 


burst mode 


not oper 



CONDITION CODES (. . . Cont'd) 



Condition Code Setting 





1 


2 


3 


Mask Bit Position 


8 


4 


2 


1 


Miscellaneous Operations 










Set, Clock 


set 


secure 


- 


not oper 


} S*ore Clock 


set 


not set 


error 


not oper 


Test and set 


zero 


one 


- 


- 


Load "Real Address 


Translation 


Segment 


Page table 


Segment- 




available 


table entry 
invalid 


entry invalid 


or Page table 
length violation 


Reset Reference Bit 


Ref bit zero. 


Ref bit zero. 


Ref bit one. 


Ref bit one. 




change bit 


change bit 


change bit 


change bit 




zero 


one 


zero 


one 


^ Make Addressable 


Page was 
connected 


Page was 

already 

addressable 






Make Unaddressabie 


Page was 
addressable 


Page was 

already 

connected 






Retrieve Status and Page 


Save 

information 
is valid 






Save 

information 
is invalid 


Set Page Bits 


Ref bit 0, 


R bit 0, 


R bit 1, 


R bit 1, 




CbitO 


Cbit 1 


CbitO 


Cbit 1 


Load Frame Index 


Index 


Index 


Index 


Index 




returned, 


returned. 


not returned. 


not returned. 


1 


page is 


page is 


page is 


address is 




addressable 


connected 


disconnected 


invalid 


Connect Page 


Successful, 


Page was 


Not 


— ■ 




index 


already 


successful. 






returned 


connected, 

index 

returned 


index not 
returned 




Disconnect Page 


Page was 
connected 


Page was 

already 

disconnected 







I 



CODE TRANSLATION TABLE 



Dec 


Hex 


Instruction 
(RR) 


Graphics and Controls 


7-Track Tape 
BCDIC (2) 


Card Code 


Binary 


BCDIC 


EBCDIC 


(1) ASCII 





00 






NUL 


NUL 




12-0-1-8-9 


0000 0000 


1 


01 






SOH 


SOH 




12-1-9 


0000 0001 


2 


02 






STX 


STX 




12-2-9 


0000 0010 


3 


03 






ETX 


ETX 




T2-3-9 


0000 001 1 


4 


04 


SPM 




PF 


EOT 




12-4-S 


0000 0100 


5 


05 


BALR 




HT 


ENO 




12-5-9 


0000 0101 


6 


06 


BCTR 




LC 


ACK 




12-6-9 


0000 0110 


7 


07 


BCR 




DEL 


BEL 




12-7-9 


0000 01 1 1 


8 


08 


SSK 






BS 




12-8-9 


0000 1000 


9 


09 


ISK 






HT 




12-1-8-9 


0000 1001 


10 


OA 


SVC 




SMM 


LF 




12-2-8-9 


0000 1010 


11 


OB 






VT 


VT 




12-3-8-9 


0000 1011 


12 


OC 






FF 


FF 




12-4-8-9 


0000 1100 


13 


OD 






CR 


CR 




12-5-8-9 


0000 1101 


14 


OE 


MVCL 




SO 


SO 




12-6-8-9 


0000 1110 


15 


OF 


CLCL 




SI 


SI 




12-7-8-9 


0000 1111 


16 


10 


LPR 




DLE 


DLE 




12-11-1-8-9 


0001 0000 


17 


11 


LNR 




DC1 


DC1 




11-1-9 


0001 0001 


18 


12 


LTR 




DC2 


DC2 




11-2-9 


0001 0010 


19 


13 


LCR 




TIVI 


DC3 




11-3-9 


0001 001 1 


20 


14 


NR 




RES 


DC4 




11-4-9 


0001 0100 


21 


15 


CLR 




NL 


NAK 




11-5-9 


0001 0101 


22 


16 


OR 




BS 


SYN 




11-6-9 


0001 0110 


23 


17 


XR 




IL 


ETB 




11-7-9 


0001 0111 


24 


18 


LR 




CAN 


CAN 




11-8-9 


0001 1000 


25 


19 


CR 




EiVl 


EM 




11-1-8-9 


0001 1001 


26 


1A 


AR 




cc 


SUB 




11-2-8-9 


0001 1010 


27 


IB 


SR 




CU1 


ESC 




11-3-8-9 


0001 1011 


28 


1C 


MR 




IFS 


FS 




11-4-8-9 


0001 1100 


29 


ID 


DR 




IGS 


GS 




11-5-8-9 


0001 1101 


30 


IE 


ALR 




IRS 


RS 




11-6-8-9 


0001 1110 


31 


IF 


SLR 




lUS 


US 




11-7-8-9 


0001 1111 


32 


20 


LPDR 




DS 


SP 




11-0-1-8-9 


0010 0000 


33 


21 


LNDR 




SOS 


1 ! 




0-1-9 


0010 0001 


34 


22 


LTDR 




FS 


■• 




0-2-9 


0010 0010 


35 


23 


LCDR 






# 




0-3-9 


0010 0011 


36 


24 


HDR 




BYP 


$ 




0-4-9 


0010 0100 


37 


25 


LRDR 




LF 


% 




0-5-9 


0010 0101 


38 


26 


MXR 




ETB 


& 




0-6-9 


0010 0110 


39 


27 


MXDR 




ESC 






0-7-9 


0010 0111 


40 


28 


LDR 






( 




0-8-9 


0010 1000 


41 


29 


CDR 






) 




0-1-8-9 


0010 1001 


42 


2A 


ADR 




SiVl 


* 




0-2-8-9 


0010 1010 


43 


2B 


SDR 




CU2 


+ 




0-3-8-9 


0010 1011 


44 


2C 


MDR 










0-4-8-9 


0010 1100 


45 


2D 


DDR 




ENQ 






0-5-8-9 


0010 1101 


46 


2E 


AWR 




ACK 






0-6-8-9 


0010 1110 


47 


2F 


SWR 




BEL 


/ 




0-7-8-9 


0010 1111 


48 


30 


LPER 











12-11-0-1-8-9 


0011 0000 


49 


31 


LNER 






1 




1-9 


001 1 0001 


50 


32 


LTER 




SYN 


2 




2-9 


0011 0010 


51 


33 


LCER 






3 




3-9 


0011 0011 


52 


34 


HER 




PN 


4 




4-9 


0011 0100 


53 


35 


LRER 




RS 


5 




5-9 


0011 0101 


54 


36 


AXR 




UC 


6 




6-9 


0011 0110 


55 


37 


SXR 




EOT 


7 




7-9 


0011 0111 


56 


38 


LER 






8 




8-9 


0011 1000 


57 


39 


CER 






9 




1-8-9 


0011 1001 


58 


3A 


AER 










2-8-9 


0011 1010 


59 


3B 


SER 




CU3 






3-8-9 


0011 1011 


60 


3C 


MER 




DC4 


< 




4-8-9 


0011 1100 


61 


3D 


DER 




NAK 


= 




5-8-9 


0011 1101 


62 


3E 


AUR 






> 




6-8-9 


0011 1110 


63 


3F 


SUR 




SUB 


? 




7-8-9 


0011 1111 



1 EBCDIC graphics shown are standard bit pattern assignment. For specific print train/chain: 
See printer manual. 

2 Add C (Check bit) for odd or even parity as needed, exept as noted. 

3 For even parity use CA 



Dec 


Hex 


Instruction 
(RR) 


Graphi 


cs and Controls 


7-Track Tape 
BCDiC (2) 


Card Code 


Binary 


BCDIC 


EBCDIC (1> 


ASCII 


64 


40 


STH 




SP 


@ 


(3) 


no punches 


0100 0000 


65 


41 


LA 






A 




12-0-1-9 


0100 0001 


66 


42 


STC 






B 




12-0-2-9 


0100 0010 


67 


43 


IC 






C 




12-0-3-9 


0100 0011 


68 


44 


EX 






D 




12-0-4-9 


0100 0100 


69 


45 


BAL 






E 




12-0-5-9 


0100 0101 


70 


46 


BCT 






F 




12-0-6-9 


01000110 


71 


47 


BC 






G 




12-0-7-9 


0100 0111 


72 


48 


LH 






H 




12-0-8-9 


0100 1000 


73 


49 


CH 






1 




12-1-8 


0100 IflOl 


74 


4A 


AH 




i 


J 




12-2-8 


0100 1010 


75 


4B 


SH 






K 


BAB 2 1 


12-3-8 


0100 1011 


76 


4C 


MH 


n 


< 


L 


B A8 4 


12-4-8 


0100 1100 


11 


4D 




[ 


( 


M 


B A 8 4 1 


12-5-8 


0100 1101 


78 


4E 


CVD 


< 


+ 


N 


B A8 4 2 


12-6-8 


0100 1110 


79 


4F 


CVB 


* 


1 





B A8 4 2 1 


12-7-8 


0100 1111 


80 


50 


ST 


& + 


& 


P 


B A 


12 


0101 0000 


81 


51 








Q 




12-11-1-9 


0101 0001 


82 


52 








R 




12-11-2-9 


0101 0010 


83 


53 








S 




12-11-3-9 


0101 0011 


84 


54 


N 






T 




12-11-4-9 


0101 0100 


85 


55 


CL 






U 




12-11-5-9 


0101 0101 


86 


56 









V 




12-11-6-9 


0101 Olio 


87 


57 


X 






w 




12-11-7-9 


0101 0111 


88 


58 


L 






X 




12-11-8-9 


0101 1000 


89 


59 


c 






Y 




11-1-8 


0101 1001 


90 


5A 


A 




1 


z 




11-2-8 


0101 1010 


91 


5B 


S 


% 


$ 


[ 


B 8 2 1 


11-3-8 


0101 1011 


92 


5C 


M 


* 




\ 


B 8 4 


11-4-8 


0101 1100 


93 


5D 


D 


] 


) 


] 


B 8 4 1 


11-5-8 


0101 1101 


94 


5E 


AL 








B 8 4 2 


11-6-8 


0101 1110 


95 


5F 


SL 


^ 


— • 


- 


B 8 4 2 1 


11-7-8 


0101 nil 


96 


60 


STD 


- 


- 




B 


11 


0110 0000 


97 


61 




1 


/ 


a 


A 1 


0-1 


0110 0001 


98 


62 








b 




11-0-2-9 


0110 0010 


99 


63 








c 




11-0-3-9 


0110 0011 


100 


64 








d 




11-0-4-9 


0110 0100 


101 


65 








e 




11-0-5-9 


0110 0101 


102 


66 








f 




11-0-6-9 


01100110 


103 


67 


MXD 






g 




11-0-7-9 


0110 0111 


104 


68 


LD 






h 




11-0-8-9 


0110 1000 


105 


69 


CD 






i 




0-1-8 


0110 1001 


106 


6A 


AD 






j 




12-11 


0110 1010 


107 


6B 


SD 






k 


A8 2 1 


0-3-8 


0110 1011 


108 


6C 


MD 


% 


% 


1 


A8 4 


0-4-8 


0110 1100 


109 


6D 


DD 


Y 


- 


m 


A8 4 1 


0-5-8 


0110 1101 


110 


6E 


AW 


\ 


> 


n 


A8 4 2 


0-6-8 


Olio 1110 


111 


6F 


SW 


■ttt 


? 


o 


A8 4 2 1 


0-7-8 


0110 nil 


112 


70 


STE 






P 




12-11-0 


0111 0000 


113 


71 








q 




12-11-0-1-9 


0111 0001 


114 


72 








r 




12-11-0-2-9 


0111 0010 


115 


73 








s 




12-11-0-3-9 


0111 0011 


116 


74 








t 




12-11-0-4-9 


0111 0100 


117 


75 








u 




12-11-0-5-9 


0111 0101 


118 


76 








V 




12-11-0-6-9 


0111 0110 


119 


77 








w 




12-11-0-7-9 


0111 0111 


120 


78 


LE 






X 




12-11-0-8-9 


0111 1000 


121 


79 


CE 






y 




1-8 


0111 1001 


122 


7A 


AE 






z 


A 


2-8 


0111 1010 


123 


7B 


SE 


# = 


# 


{ 


8 2 1 


3-8 


0111 1011 


124 


7C 


iVlE 


@" 


@ 


1 


8 4 


4-8 


0111 1100 


125 


7D 


DE 






} 


8 4 1 


5-8 


0111 1101 


126 


7E 


AU 


> 


= 


~ 


8 4 2 


6-8 


0111 1110 


127 


7F 


SU 


y 


" 


DEL 


8 4 2 1 


7-8 


0111 1111 



I 



1 EBCDIC graphics shown are standard bit pattern assignments. 
See printer manual. 

2 Add C (check bit) for odd or even parity as needed, exept as 



For specific print train/chai 
noted. 



CODE TRANSLATION TABLE { Cont'd) 



Dec 


Hex 


Instruction 
(RS, SI, S) 


Graphics and Controls 


7-Track Tape 
BODIO (2) 


Card Code 


Binary 


BODIO 


EBCDIC (1) 


ASCII 


128 


80 


SSM 










12-0-1-8 


1000 0000 


129 


81 






a 






12-0-1 


1000 0001 


130 


82 


LPSW 




b 






12-0-2 


1000 0010 


131 


83 


Diagnose 




c 






12-0-3 


1000 0011 


132 


84 






d 






12-0-4 


1000 0100 


133 


85 






e 






12-0-5 


1000 0101 


134 


86 


BXH 




f 






12-0-6 


1000 0110 


135 


87 


BXLE 




g 






12-0-7 


1000 0111 


136 


88 


SRL 




h 






12-0-8 


1000 1000 


137 


89 


SLL 




i 






12-0-9 


1000 1001 


138 


8A 


SRA 










12-0-2-8 


100Q.1010 


139 


8B 


SLA 










12-0-3-8 


1000 1011 


140 


80 


SRDL 










12-0-4-8 


1000 1100 


141 


8D 


SLDL 










12-0-5-8 


1000 1101 


142 


8E 


SRDA 










12-0-6-8 


1000 1110 


143 


8F 


SLDA 










12-0-7-8 


1000 1111 


144 


90 


STM 










12-11-1-8 


1001 0000 


145 


91 


TiVI 




i 






12-11-1 


1001 0001 


146 


92 


MVI 




k 






12-11-2 


1001 0010 


147 


93 


IS 




1 






12-11-3 


1001 0011 


148 


94 


Nl 




m 






12-11-4 


1001 0100 


149 


95 


OLI 




n 






12-11-5 


1001 0101 


150 


96 


01 











12-11-6 


1001 0110 


151 


97 


XI 




P 






12-11-7 


1001 0111 


152 


98 


LM 




q 






12-11-8 


1001 1000 


153 


99 












12-11-9 


1001 1001 


154 


9A 












12-11-2-8 


1001 1010 


155 


9B 












12-11-3-8 


1001 1011 


156 


90 


SIO, SIOF 










12-11-4-8 


1001 1100 


157 


9D 


TIO, OLRIOl 








12-11,-5-8 


1001 1101 


158 


9E 


HIO, HDV 










12-11-6-8 


1001 1110 


159 


9F 


TCH 










12-11-7-8 


1001 1111 


160 


AO 












11-0-1-8 


1010 0000 


161 


A1 






~ 






11-0-1 


1010 0001 


162 


A2 






s 






11-0-2 


1010 0010 


163 


A3 






t 






11-0-3 


1010 0011 


164 


A4 






u 






11-0-4 


1010 0100 


165 


A5 






V 






11-0-5 


1010 0101 


166 


A6 






w 






11-0-6 


1010 0110 


167 


A7 






X 






11-0-7 


10100111 


168 


A8 






y 






11-0-8 


1010 1000 


169 


A9 






z 






11-0-9 


1010 1001 


170 


AA 












11-0-2-8 


1010 1010 


171 


AB 












11-0-3-8 


1010 1011 


172 


AO 


STNSM 










11-0-4-8 


1010 1100 


173 


AD 


STOSM 










11-0-5-8 


1010 1101 


174 


AE 












11-0-6-8 


1010 1110 


175 


AF 


MO 










11-0-7-8 


1010 1111 


176 


BO 


OTP 










12-11-0-1-8 


1011 0000 


177 


B1 












12-11-0-1 


1011 0001 


178 


B2 


See below 










12-11-0-2 


1011 0010 


179 


B3 












12-11-0-3 


1011 0011 


180 


B4 


IPB 










12-11-0-4 


1011 0100 


181 


B5 


SPB 










12-11-0-5 


1011 0101 


182 


B6 


STOTL 










12-11-0-6 


1011 0110 


183 


B7 


LOTL 










12-11-0-7 


1011 0111 


184 


B8 


LFI 










12-11-0-8 


1011 1000 


185 


B9 












12-11-0-9 


1011 1001 


186 


BA 


OS 










12-11-0-2-8 


1011 1010 


187 


BB 


ODS 










12-11-0-3-8 


1011 1011 


188 


BO 












12-11-0-4-8 


1011 1100 


189 


BD 


OLM 










12-11-0-5-8 


1011 1101 


190 


BE 


STOM 










12-11-0-6-8 


1011 1110 


191 


BF 


lOM 










12-11-0-7-8 


1011 1111 



B202 -STIDP 
B203 - STIDO 
B204 - SOK 
B205 - STCK 
B206 - SCKO 



B207 - STCKO 
B208.-SPT 
B209 - STPT 
B213- RRB 
B20A-SPKA 

1-10 



B20B - IPK 
B215-0LRP 
B21B - DECP 
B210- DCTP 
B21D-MAD 



B21E -MUN 
B21F -STOAP 



CODE TRANSLATION TABLE ( Cont'd) 



Dec 


Hex 


Instruction 
(SS) 


Graphics and Controls 


7-Track Tape 
BCDIC (2) 


Card Code 


Binary 


BCDIC 


EBCDIC (1) 


ASCII 


192 


CO 




? 


{ 




B A8 2 


12-0 


1100 0000 


193 


CI 




A 


A 




B A 1 


12-1 


1100 0001 


194 


C2 




B 


B 




B A 2 


12-2 


1100 0010 


195 


C3 




C 


c 




B A 2 1 


12-3 


1100 0011 


196 


C4 




D 


D 




B A 4 


12-4 


1100 0100 


197 


C5 




E 


E 




B A 4 1 


12-5 


1100 0101 


198 


C6 




F 


F 




B A 4 2 


12-6 


1100 0110 


199 


C7 




G 


G 




B A 4 2 1 


12-7 


1100 0111 


200 


C8 




H 


H 




BAB 


12-8 


1100 1000 


201 


C9 




1 


1 




B A8 1 


12-9 


1100 1001 


202 


CA 












12-0-2-8-9 


1100 1010 


203 


CB 












12-0-3-8-9 


1100 1011 


204 


CO 






J' • 






12-0-4-8-9 


1100 1100 


205 


CD 












12-0-5-8-9 


1100 1101 


206 


CE 






V 






12-0-6-8-9 


1100 1110 


207 


CF 












12-0-7-8-9 


1100 1111 


208 


DO 




! 


} 




B 8 2 


11-0 


1101 0000 


209 


D1 


MVN 


J 


J 




B 1 


11-1 


1101 0001 


210 


D2 


MVC 


K 


K 




B 2 


11-2 


1101 0010 


211 


D3 


MVZ 


L 


L 




B 2 1 


11-3 


1101 0011 


212 


D4 


NC 


M 


M 




B 4 


11-4 


1101 0100 


213 


D5 


CLC 


N 


N 




B 4 1 


11-5 


1101 0101 


214 


D6 


OC 










B 4 2 


11-6 


1101 0110 


215 


D7 


XC 


P 


P 




B 4 2 1 


11-7 


1101 0111 


216 


D8 


RSP 


Q 


Q 




B 8 


11-8 


1101 1000 


217 


D9 




R 


R 




B 8 1 


11-9 


1101 1001 


218 


DA 












12-11-2-8-9 


1101 1010 


219 


DB 












12-11-3-8-9 


1101 1011 


220 


DC 


TR 










12-11-4-8-9 


1101 1100 


221 


DD 


TRT 










12-11-5-8-9 


1101 1101 


222 


DE 


ED 










12-11-6-8-9 


1101 1110 


223 


DF 


EDMK 










12-11-7-8-9 


1101 1111 


224 


EO 




t 


\ 




A8 2 


0-2-8 


1110 0000 


225 


El 












11-0-1-9 


1110 0001 


226 


E2 




S 


s 




A 2 


0-2 


1110 0010 


227 


E3 




T 


T 




A 2 1 


0-3 


1110 0011 


228 


E4 




U 


U 




A 4 


0-4 


1110 0100 


229 


E5 




V 


V 




A 4 


0-5 


1110 0101 


230 


E6 




w 


w 




A 4 2 


0-6 


11100110 


231 


E7 




X 


X 




A 4 2 1 


0-7 


1110 01-11 


232 


E8 




Y 


Y 




A8 


0-8 


1110 1000 


233 


E9 




z 


z 




A8 1 


0-9 


1110 1001 


234 


EA 












11-0-2-8-9 


1110 1010 


235 


EB 












11-0-3-8-9 


1110 1011 


236 


EC 






H 






11-0-4-8-9 


1110 1100 


237 


ED 












11-0-5-8-9 


1110 1101 


238 


EE 












11-0-6-8-9 


1110 1110 


239 


EF 












11-0-7-8-9 


1110 nil 


240 


FO 


SRP 










8 2 





1111 0000 


241 


F1 


MVO 


1 


1 




1 


1 


1111 0001 


242 


F2 


PACK 


2 


2 




2 


2 


1111 0010 


243 


F3 


UNPK 


3 


3 




2 1 


3 


1111 0011 


244 


F4 




4 


4 




4 


4 


1111 0100 


245 


F5 




5 


5 




4 1 


5 


1111 0101 


246 


F6 




6 


6 




4 2 


6 


nil 0110 


247 


F7 




7 


7 




4 2 1 


7 


nil 0111 


248 


F8 


ZAP 


8 


8 




8 


8 


1111 1000 


249 


F9 


CP 


9 


9 




8 1 


9 


1111 1001 


250 


FA 


AP 




1 






12-11-0-2-8-9 


1111 1010 


251 


FB 


SP 










12-11-0-3-8-9 


1111 1011 


252 


FC 


MP 










12-11-0-4-8-9 


1111 1100 


253 


FD 


DP 










12-11-0-5-8-9 


1111 1101 


254 


FE 












12-11-0-6-8-9 


1111 1110 


255 


FF 












12-11-0-7-8-9 


1111 1111 



MACHINE INSTRUCTIONS FORMATS 



FIRST HALFWORD 1 | SECOND HALFWORD 2 



THIRD HALFWORD 3 



I 



REGISTER REGISTER 

OPERAND 1 OPERAND 2 



R1 



R2 



7|8 1112 15 
REGISTER 
OPERAND 1 



Op Code } R1 I X2 



ADDRESS OF 
OPERAND 2 



B2 



7|8 11 12 15|16 19 
REGISTER REGISTER 
OPERAND 1 OPERAND 3 
I 



m 



R3 



B2 



8 11 12 15 1 

IMMEDIATE 
OPERAND 



Op Code 



ADDRESS OF 
OPERAND 2 



ADDRESS OF 
OPERAND 1 



3 20 

ADDRESS OF 
OPERAND 1 



B1 

I 15 16 19 
LENGTH LENGTH 
OPERAND 1 OPERAND 2 
I I 



ADDRESS OF 
OPERAND 1 



Op Code 



Op Code 



LI i L2/13 i B1 I 
'8 11 12 15 16 19 20 



ADDRESS OF 
OPERAND 1 



15 16 19 20 



ADDRESS OF 
OPERAND 2 



ADDRESS OF 
OPERAND 2 



B2 I 



31 32 35 36 



CONTROL REGISTER ALLOCATION 








1 


1 





SYSTEM CONTR 


TRANSL CONTR 


EXTERNAL INTERRUPTION MASKS 


1 


SEGM TBL LENGTH 


SEGMENT TABLE ORIGIN ADDRESS | 


2 


CHANNEL MASKS 


3 




4 




5 




6 




7 




8 




MONITOR MASKS 


g 


PER EVENT MASKS 




PER GR ALTERATION MASKS 


10 




PER STARTING ADDRESS 


11 




PER ENDING ADDRESS 


12 




13 




14 


ERROR RECOVERY CONTR & MASKS | 


15 





ASSIGNMENT OF CONTROL REGISTER FIELDS 











Initial 


CR 


Bits 


Name of Field 


Associated with 


Value 








Block-Multiplexing Control 


Block-Multiplexing Channels 








1 


SSM-Suppression Control 


SET System Mask 








8-9 


Page Size** 


Dynamic Addr. Translation 








10 


Reserved** 


Dynamic Addr. Translation 








11-12 


Segment Size** 


Dynamic Addr. Translation 








20 


Clock-Comparator Mask 


Clock Comparator 








21 


CPU-Timer Mask 


CPU Timer 








24 


Interval-Timer Mask 


Interval Timer 


1 





25 


Interrupt-Key Mask 


Interrupt Key 


1 





26 


External-Signal Mask 


External Signal 


1 


2 


0-31 


Channel Masks 


Channels 


1 


8 


16-31 


Monitor Masks 


Monitor Call 





9 





Successful-Branching-Event Mask 


Program-Event Recording 





9 


1 


Instruction-Fetching-Event Mask 


Program-Event Recording 





g 


2 


Storage-Alternation-Event Mask 


Program-Event Recording 





9 


3 


GR-Alternation-Event Mask 


Program-Event-Recording 





9 


16-31 


PER* General-Register Masks 


Program-Event-Recording 





10 


8-31 


PER Starting Address 


Program-Event Recording 





11 


8-31 


PER Ending Address 


Program-Event Recording 










Check Stop Control** 


Machine Check Handling 


1 




1 


Synchronous MCEL Control** 


Machine Check Handling 


1 




2 


I/O Extended Logout Control** 


Machine Check Handling 







4 


Recovery-Report Mask 


Machine-Check Handling 







5 


Degradation-Report Mask 


Machine-Check Handling 







6 


External-Damage-Report Mask 


Machine-Check Handling 


1 




7 


Warning Mask 


Machine-Check Handling 







8 


Asynchronous MCEL Control** 


Machine-Check-Handling 







9 


Asynchronous Fixed Log Contr.** 


Machine-Check-Handling 





15 


8-28 


MCEL Address** 


Machine-Check-Handling 


512 



* PER Means Program-Event Recording 
** Only Used in /370 Mode 



PERMANENT MAIN STORAGE ASSIGNMENT 



Storage Loc 


Byte 


Byte 




Byte 


Byte 


Hex 


Dec 






4 

8 

C 

10 

14 

18 

1C 

20 

24 

28 

2C 

30 

34 

38 

3C 

40 

44 

48 

4C 

50 

54 

58 

5C 

60 

64 

68 

6C 

70 

74 

78 

7C 

80 

84 

88 

8C 

90 

94 

98 

9C 

AO 

A4 

A8 

AC 




4 

8 

12 

16 

20 

24 

28 

32 

36 

40 

44 

48 

52 

56 

60 

64 

68 

72 

76 

80 

84 

88 

92 

96 

100 

104 

108 

112 

116 

120 

124 

128 

132 

136 

140 

144 

148 

152 

156 

160 

164 

168 

172 


Restart New PSW (IPL PSW) 


Restart Old PSW(IPLCCWI) 


(IPLCCW2) 


External Old PSW 


Supervisor Call Old PSW 


Program Old PSW 


Machine Check Old PSW 


Input/Output Old PSW 


Channel Status Word 


Channel Address Word 




Interval Timer 




External New PSW 


Supervisor Call New PSW 


Program New PSW 


Machine Check New PSW 


Input/Output New PSW 




0000000000000000 


External Interruption Code 


00000000000 


ILC 





SVC Interruption Code 


0000000000000 


ILC 





Program Interruption Code 


00000000 


ACCESS Exception Address 


00000000 


Monitor Class # |PER Code |000 00000000 


00000000 


PER Address 


00000000 


Monitor Code 




Channel ID 


Reserved 



PERMANENT MAIN STORAGE ASSIGNMENT (. . . Cont'd) 



Storag 


e Loc 


Byte 


Byte 


Byte 


Byte 


Hex 


Dec 


BO 
B4 
88 
89 

D4 
D8 


176 
180 
184 

188 

1 

212 
216 


Limited Channel Logout 




1 oJl/0 Address 






CPU-Timer Save Area 




DC 
EO 


220 
224 






Clock-Comparator Save Area 




E4 
E8 


228 
232 






Machine Check Interruption Code 




EC 
FO 


236 
240 










F4 
F8 
FC 


244 
248 
252 






o| Failing Storage Address | 


Reserved 




15C 
160 

1 


348 
352 






Floating Point Register Save Area 




1 
17C 

180 

1 


380 

384 

1 






General Register Save Area 




1 
1BC 

ICO 

1 


444 

448 
1 






Control Register Save Area 




1FC 


508 







I 



PROGRAM STATUS WORD (EC-mode) 
8 






R 











T 


^ 


E 


KEY 


E 


M 


W 


P 


00 


cc 


PROG 
MASK 


00000000 






INSTRUCTION ADDRESS 



Bit 


Description 


Bit 


Description 





'Always zero 


15 


Problem state 


1 


PER mask 


16-17 


'Always zero 


2-4 


*Always zero 


18-19 


Condition code 


5 


* 'Translate mode 


20 -^ 


r Fixed-point overflow mask 


6 


I/O interrupt mask 


21 Prog. 


Decimal overflow mask 


7 


External interrupt mask 


22 mask 


Exponent underflow mask 


8-11 


KEY 


23 J 


*- Significance mask 


12 


Always one in EC mode 


24-31 


'Always zero 


13 


Machine check mask 


32-39 


•Always zero 


14 


Wait state 


40-63 


Instruction address 



*lf not zero a Specification Exeption is recognized 
"Only used in /370 mode 



PROGRAM STATUS WORD (BC-mode) 










8 








16 


31 


CHAN 
MASK 
0-5 


'6 


E 


KEY 


B 


M 


W 


P 


INTERRUPTION CODE 



ILC 


CC 


PROG 
MASK 


INSTRUCTION ADDRESS 



12 
13 



Description 

Channel mask 
Channel 1 mask 
Channel 2 mask 
Channel 3 mask 
Channel 4 mask 
Channel 5 mask 
Mask for channel 6 and up 
External interrupt mask 
Protection key 
Always in EC mode 
Machine check mask 



Bit 


Description 


14 


Wait state 


15 


Problem state 


16-31 


Interruption code 


32-33 


Instruction length code 


34-35 


Condition code 


36 ^ 


r Fixed-point overflow mask 


37 Prog. 


Decimal overflow mask 


38 mask 


Exponent underflow mask 


39-^ 


'^Significance mask 


40-63 


Instruction address 



CHANNEL ADDRESS WORD (CAW) (X'48') 

3 4 7 8 15 16 



Key 





Command Address 



CHANNEL COMMAND WORD (CCW) 

7 8 15 16 



I 



Command Code 


Data Address 


32 37 38 40 




47 48 


55 56 


63 


Flags 





Ignored 


Byte Count 



Flags 



Bit 


Description 


32 


CD-bit(80) 


33 


CC-bit (40) 


34 


SLI-bit (20) 


35 


Skip bit (10) 


36 


PCI-bit (08) 


37 


IDA-bit(04) 



causes use of address portion of next CCW 
cuases use of command code and data address of next CCW 
causes suppression of possible incorrect length indication 
suppresses transfer of information to main storage 
causes a channel Program Controlled Interruption 
specifies indirect data addressing (only /370 mode) 



CHANNEL STATUS WORD (CSW) (X'40') 






3 4 


5 


6 7 


8 


15 16 23 24 


31 


Key 





L 


C C 


Command Address 


32 


39 40 


47 48 55 56 


63 


1 
Unit Status Channel 

1 


Byte Count 



Description 



5 




Logout pending 


6,7 




Deferred cond. code 


32 


(8000) 


Attention 


33 


(4000) 


Status Modifier 


34 


(2000) 


Control unit end 


35 


(1000) 


Busy 


36 


(0800) 


Channel end 


37 


(0400) 


Device end 


38 


(0200) 


Unit check 


39 


(0100) 


Unit exception 



Bit 


Descript 


on 


40 


(0080) 


Program controlled interruption 


41 


(0040) 


Incorrect length 


42 


(0020) 


Program check 


43 


(0010) 


Protection check 


44 


(0008) 


Channel data check 


45 


(0004) 


ChanneF control check 


46 


(0002) 


Interface control check 


47 


(0001) 


Chaining check 



Byte count: Bits 48-63 form the residual count for the last CCW used. 



LIMITED CHANNEL LOGOUT (X'BO') 
1 3 4 7 8 12 13 



23 24 26 28 29 






SCUid 


Detect 


Source 





a- 








Field- Validity 
Flags 


TT 





A 


Seq 



-Zero, if LCL is stored 

Detect 

Description 



CPU 
Channel 
Storage control 
Storage 



Field Validity Flags 
Description 



Sequence code 
Unit status 
CCW address and key 
Channel address 
Device address 



Description 



CPU 
Channel 
Storage control 
Storage 
Control unit 



TT (Type of termination) 
Bit Description 




1 



Interface disconnect 
Stop, stack or normal 
Selective reset 
Reserved 



A (bit 28): I/O error alert 

Seq (bits 29-31 ): Sequence code 



MACHINE CHECK INTERRUPTION CODE (X'EB') 

8 9 15 16 1819 20 



MC Conditions 





D 


s 

E 





K 
E 


^ 


Validity 


32 39 40 46 48 55 56 


63 


r ' 

000000000 0000 


c c 

TC 


1 
0000000000000000 



MCC 
Bit 


onditions 
Description 


Time 

Bit 

15 

Stge 

Bit 


Description 




I 

3 


System damage 
Instr. proc'g damage 
System recovery 
Timer damage 
Timing Facility 
External damage 

Degradation 
Warning 

ity 
Description 


Delayed 
rror 

Description 


4 
5 
6 

7 
8 

Valid 
Bit 


16 
18 

Bit 


Storage error uncorrect 
Storage-key error uncor 

Description 


20 
21 
22 
23 
24 
25 


PSW bits 12-15 
PSW masks and key 
Program mask and cond. code 
Instruction address 
Failing storage address 
Region code 


27 
28 
29 
30 
31 
46 
47 


Floating-point registers 
General registers 
Control registers 
CPU extended logout 
Storage logical 
CPU Timer 
Clock comparator 



CODES FOR PROGRAM INTERRUPTION (X'8E') 



Interruption 


Program Interruption 


Interruption 


Program Interruption 


Code 


Cause 


Code 


Cause 


Dec 


Hex 


Dec 


Hex 


1 


0001 


Operation 


12 


OOOC 


Exponent overflow 


2 


0002 


Privileged operation 


13 


000 D 


Exponent underflow 


3 


0003 


Execute 


14 


OOOE 


Significance 


4 


0004 


Protection 


15 


OOOF 


Floating point divide 


5 


0005 


Addressing 


16 


0010 


Segment translation* 


6 


0006 


Specification 


17 


0011 


Page translation* 


7 


0007 


Data 


18 


0012 


Translation specification* 


8 


0008 


Fixed-point overflow 


19 


0013 


Special operation 


9 


0009 


Fixed-point divide 


24 


0018 


Page access 


10 


OOOA 


Decimal overflow 


26 


001 A 


Page state 


11 


OOOB 


Decimal divide 


27 


001 B 


Page translation 








64 


0040 


Monitor event 








128 


0080 


Program event 



*Used only in /370 mode 



CODES FOR EXTERNAL INTERRUPTIONS (X'86') 



Interruption Code 


External Interruption 


Indication of 


(Hex) 


Cause 


Concurrent Condition 
by Bit Positions 


0080 


Interval timer 


9-15 


0040 


Interrupt key 


Band 10-15 


0020 


External signal 2 


8,9,11-15 


0010 


External signal 3 


8-10,12-15 


0008 


External signal 4 


8-11, 13-15 


0004 


External signal 5 


8-12,14,15 


0002 


External signal 6 


8-13,15 


0001 


External signal 7 


8-14 


1004 


Clock comparator 




1005 


CPU timer 





CODES FOR INPUT/OUTPUT INTERRUPTIONS (X'BA') 



Interruption Code 


Input/Output Interruption 


(Hex) 


Cause 


00 dd 


Channel 


01 dd 


Channel 1 


02 dd 


Channel 2 


03 dd 


Channel 3 


04 dd 


Channel 4 


05 dd 


Channel 5 


06 dd 


Channel 6 



Note: d = device address 



CODES FOR SUPERVISOR CALL INTERRUPTIONS (X'BA') 



Interruption Code 
(Hex) 


Supervisor Call Interruption 
Cause 


00 rr 


Instruction (OA) 



= Riand R2 field of 
SUPERVISOR CALL 



CHANNEL COMMANDS 

Standard Command Code Assignments (CCW bits 0-7) for I/O Operations 



xxxx 0000 


Invalid 


tttt ttoi 


Write 


tttt 0100 


Sense 


ttttttio 


Read 


xxxx 1 000 


Transfer in Channel 


ttttttll 


Control 


tttt 1100 


Read backward 


000O0011 


Control No Operation 



x = Bit ignored t = Modifier bit for specific type of I/O device 



CHANNEL COMMANDS (. . . Cont'd) 

3210. 3215 CONSOLES 

Write, No Carrier Return 01 

Write, Auto Carrier Return 0£ 

Read Inquiry 0/ 



Sense 
Audible Alarm 



Source: GA 24-3557 

04 
OB 



3505 CARD READER / 3525 CARD PUNCH 




Source: GA 21 -91 24 


Command 


Bi 


nary 


Hex 


Bit Meanings 


Sense 





10 


4 


SS Stacker 


Feed, Select Stacker 


S S 1 


F 1 1 




00 1 

01 2 
10 2 


Read Only* 


1 1 DO 


F 1 




Diagnostic Read 


110 1 


10 


D2 


Read, Feed, Select Stacker* 


S S DO 


F 1 




Write RCE Format* t 


1 


1 


1 1 


Format Mode 

Unformatted 

1 Formatted 


3505 only 










Write OMR Format 


11 


1 


3 1 


D Data Mode 


3525 only 








1-EBCD.IC 


Write, Feed, Select Stacker 


S S DO 


1 




1 2-Card Image 


Print Line* 


L L L L 


L 1 1 




L Line Position 
5 Bit Binary Value 



*Special feature on 3525 t Special feature on 3505 



3211 PRINTER/381 


1 CONTROL UNIT 




Source: GA24-3543 




After 










Write 


Immed. 






Space 1 Line 


09 


OB 


Write without spacing 


01 


Space 2 Lines 


11 


13 


Sense 


04 


Space 3 Lines 


19 


IB 


Load UCSB 


FB 


Skip to Channel 


- 


83 


Fold 


43 


Skip to Channel 1 


89 


8B 


Unfold 


23 


Skip to Channel 2 


91 


93 


Load FCB 


63 


Skip to Channel 3 


99 


9B 


Block Data Check 


73 


Skip to Channel 4 


A1 


A3 


Allow Data Check 


7B 


Skip to Channel 5 


A9 


AB 


Read PLB 


02 


Skip to Channel 6 


BI 


B3 


Read UCSB 


OA 


Skip to Channel 7 


B9 


BB 


Read FCB 


12 


Skip to Channel 8 


CI 


C3 


Check Read 


06 


Skip to Channel 9 


C9 


CB 


Diagnostic Write 


05 


Skip to Channel 10 


D1 


D3 


Raise Cover 


6B 


Skip to Channel 1 1 


D9 


DB 


Diagnostic Gate 


07 


Skip to Channel 12 


El 


E3 







3803/3420 MAGNETIC TAPE 




Source: 


GA32-0020 


Write 


01 


Data Security Erase 


97 


Read Forward 


02 


Diagnostic Write Mode Set 


OB 


Read Backward 

Sense 

Sense Reserve* 


OC 
04 
F4 


Set Mode 1 (7-track) t 




Density Parity DC Trans 


Cmd 


Sense Release* 


D4 


f on off 


53 


Request Track in Error 


IB 


°^^ 1 off / °^^ 


73 


Loop Write to Read 


8B 


556 < '^ 0" < on 


7B 


Set Diagnose 


4B 


even ^^^ f off 


63 


Rewind 


07 


\ on 


6B 


Rewind Unload 


OF 


f on off 


93 


Erase Gap 


17 


odd < „ r off 


B3 


Write Tape Mark 


IF 


800 \ ^ °" 1 on 


BB 


Backspace Block 


27 




A3 


Backspace File 


2F 


off J 


AB 


Forward Space Block 


37 






Forward Space File 


3F 


Set Mode 2 (9-track) 








1600 bpi 


C3 






SOObpi t 


CB 



*Two-channel switch required 



t Special feature for NRZI operation 



CHANNEL COMMANDS {. . . Cont'd) 



8809 MAGNETIC TAPE 



Command 


Command Code 


Write 


01 


Read 


02 


Rewind 


07 


Rewind-Unload 


OF 


Erase Gap 


17 


Write Tape Mark 


IF 


Backspace Block 


27 


Backspace File 


2F 


Forwardspace Block 


37 


Forwardspace File 


3F 


Data Security Erase 


97 


Set Low Speed 


83 


Set Long Gap 


13 


Set Normal Gap 


23 


Set High Speed and Long Gap 


93 


Set High Speed and Normal Gap 


33 


Set Low Speed and Long Gap 


53 


Set Low Speed and Normal Gap 


63 


Set High Speed 


E3 


ERP LoopWrite-to-Read 


8B 


Control-No Op 


03 


Sense 


04 


Sense I/O 


E4 


Read and Reset Buffered Log 


A4 



I 



DIRECT ACCESS DEVICES 



Source: G A26-1 592 for 3830/3330 

GA26-3599, GA26-1606 for 2314,2319 



Command 



Control Orient (c) 
Recalibrate 
Seek 

Seek cylinder 
Seek Head 
Space Count 
Set File Mask 
Set Sector (a) 
Restore (a) 
Vary Sensing (c) 
Diagnostic Load (a) 
Diagnostic Write (a) 

Search Home Address Equal 

Identifier Equal 
Identifier High 
Identifier Equal or High 
Key Equal 
Key High 

Key Equal or High 
Key and Data Equal (d) 
Key and Data High (d) 
Key and Data Equal or High (d) 

Continue Search Equal (d) 

Scan Search High (d) 

Search High or Equal (d) 
Set Status Modifier (d) 
Set Status Modifier (d) 
No States Modifier (d) 



OF 
IF 
23 
17 
27 
53 
73 



71 
29 



25 
45 
65 
35 
75 
55 



C9 
E9 



CD 
ED 



E5 
B5 
F5 
D5 



Nonzero 
Nonzero 



3 (a); nonzero (d) 



Number of bytes 
(incl. mask bytes) 
in search argument 



• Code same as MT Off except as listed 
a 3830/3330 and 2835/2305 only 
b 3830/3330 only 
c 2835/2305 only 



d 2314, 2319 only 

e Channel attachment and 2-channel switch 
feature required; standard on 2314 with 2844 



CHANNEL COMMAND (. . .Cont'd) 



DIRECT ACCESS DEVICES (. . . Cont'd) 



Command 


MT Off 


MT On* 


Count 


Read 


Home Address 


1A 


9A 


5 




Count 


12 


92 


8 




Record 


16 


96 






Data 

Key and Data 


06 
OE 


86 
8E 


1 Number of bytes 
1 to be transferred 




Count, Key and Data 


IE 


9E 






IPL 


02 








Sector (a) 


22 




1 


Sense 


Sense I/O 


. 04 




24 (a); 6 (d) 




Read, Reset Buffered Log (b) 


A4 




24 




Read Buffered Log (c) 


24 




128 




Device Release (e) 


94 




24 (a); 6(d) 




Device Reserve (e) 


B4 




24 (a); 6 (d) 




Read Diagnostic Status 1 (a) 


44 




16 or 512 


Write 


Home Address 


19 




5 




Record 


15 




8+KL+DLorRO 




Erase 


11 




8+KL+DL 




Count, Key and Data 


ID 




8+KL+DL 




Special Count, Key and Data 


01 




8+KL=DL 




Data 


05 




DL 




Key and Data 


OD 




KL+DL 



* Code same as MT Off except as listed 

a 3830/3330 and 2835/2305 only 

b 3830/3330 only 

c 2835/2305 only 



2314, 2319 only 

Channel attachment and 2-channel switch 

feature required; standard on 2314 with 2844 



DIRECTACCESS DEVICES (3310,3370) FBA MODE 



Command 


MTOff 


MTOn* 


Count 


Control 


No-Operation 
Define Extent 
Locate 


03 
63 

43 






Read 


Read 
Read IPL 


42 
02 






Write 


Write 


41 






Sense 


Test I/O 

Sense I/O 

Sense 

Read and Reset Buffered Log 

Read Device Characteristics 
•Device Reserve 
•Unconditional Reserve 
•Device Release 


00 
E4 
04 
A4 
64 
B4 
14 
94 






Diagnostic 


Diagnostic Control 
Diagnostic Sense 


F3 
C4 







•These commands are executed as sense 



HEXADECIMAL AND DECIMAL CONVERSION 

From Hex: Locate each hex digit in its corresponding column position ahd note thejjecimal 
eauivalents. Add these to obtain the decimal value. 

From Dec: Locate the largest decimal value in the table that will fit into the decimal number 
to. be converted. 

Note its hex equivalent and hex column position. 
Find the decimal remainder. 
Repeat the process on this and subsequent remainders. 



I 



Hexadecimal Columns 1 


6 


5 


4 


3 


2 


' 1 


Hex Dec 


Hex 


Dec 


Hex Dec 


Hex 


Dec 


Hex 


Dec 


Hex 


Dec 



































1 1 048 576 


1 


65 536 


1 


4 096 


1 


256 


1 


16 


1 


1 


2 2 097 152 


2 


131 072 


2 


8 192 


2 


512 


2 


32 


2 


2 


3 3 145 728 


3 


196 608 


3 


12 288 


3 


768 


3 


48 


3 


3 


4 4 194 304 


4 


262 144 


4 


16 384 


4 


1024 


4 


64 


4 


4 


5 5 242 880 


5 


327 680 


5 


20 480 


5 


1 280 


5 


80 


5 


5 


6 6 291456 


6 


393 216 


6 


24 576 


6 


1 536 


6 


96 


6 


6 


7 7 340 032 


7 


458 752 


7 


28 672 


7 


1 792 


7 


112 


7 


7 


8 8 388 608 


8 


524 288 


8 


32 768 


8 


2 048 


8 


128 


8 


8 


9 9 437 184 


9 


589 824 


9 


36 864 


9 


2 304 


9 


144 


9 


9 


A 10 485 760 


A 


655 360 


A 


40 960 


A 


2 560 


A 


160 


A 


10 


8 11534 336 


B 


720 896 


B 


45 056 


B 


2 816 


B 


176 


B 


11 


C 12 582 912 


c 


786 432 


C 


49 152 


C 


3 072 


C 


192 


C 


12 


D 13 631488 


D 


851 968 


D 


53 248 


D 


3 328 


D 


208 


D 


13 


E 14 680 064 


E 


917 504 


E 


57 344 


E 


3 584 


E 


224 


E 


14 


F 15 728 640 


F 


983 040 


F 


61440 


F 


3 840 


F 


240 


F 


15 


01 23 


45 6 7 


01 23 


4567 


01 23 


4567 1 


Byte 


Byte 


Byte 1 



POWERS OF 2 



POWERS OF 16 



2n 


n 


256 


8 


512 


9 


1024 


10 


2 048 


11 


4 096 


12 


8 192 


13 


16 384 


14 


32 768 


15 


65 536 


16 


131 072 


17 


262 144 


18 


524 288 


19 


1 048 576 


20 


2 097 152 


21 


4 194 304 


22 


8 388 608 


23 


16 777 216 


24 



2n = i6n:4 



16" 


n 


1 





16 


1 


256 


2 


4 096 


3 


65 536 


4 


1 048 576 


5 


16 777 216 


6 


268 435 456 


7 


4 294 976 296 


8 


68 719 476 736 


9 


1099 511 627 776 


10 


17 592 186 044 416 


11 


281 474 976 710 656 


12 


4 503 599 627 370 496 


13 


72 057 594 037 927 936 


14 


1 152 921 504 606 846 976 


15 



SENSE INFORMATION SUMMARY 

1017 - P3Ref Xatie Reader 

Sense Byte Designation 



Bit : command reject 

1 : intervention reject 

2 : bus-out checic 
3:- 

4 : data check 
5:- 



1018- Paper Tape Punch 
Sense Byte 



7 : brol<en tape 



Designation 

Bit : command reject 

1 : intervention required 

2 : bus-out checl< 

3 : equipment check 

4 : data check 
5:- 



1287 - Optical Reader 



Sense Byte 


Designation 





Bit : command reject 




1 : intervention required 




2 : bus-out check 




3 : equipment check 




4 : data check 




5 : overrun 




6 : non-recovery 




7 : keyboard correction (tape only) 


1 


Bit : tape mode 




1 : late stacker select 




2 : no document found 




3:- 




4 : invalid operation 




5:- 




6:- 




7:- 


1288 -Optical Reader 




Sense Byte 


Designation 



Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 

5 : overrun 

6 : non-recovery 

7 :- 

BitO:- 

1 : end-of-page 

2 : no document found 



alid operation 



SENSE INFORMATION SUMMARY {. . . . Cont'd) 



Sense Byte 


Designation 





Bit : command reject 




1 : intervention required 




2 : bus-out check 




3 : equipment check 




4 : data check 




5 : parity check (DCS storage) 

6:- 

7 : channel 9 




1 


Not used 



1419-PCU-MiCR 



1419-SCU-MICR 



I 



Bit : chain interlock 

1 : forms check 

2 : coil protect check 

3 : subscan ring check 

4 : chain buffer address register check 
5:- 

6 :any hammer on check 
7:- 

Not used 

Bit : hammer reset failure check 

1 : no fire check 

2 : misfire check 

3 : print data buffer parity check 

4 : check bit buffer parity check 

5 : chain buffer parity check 

6 : buffer address register parity check 

7 : clock check 

Bit : open hammer coil check 



Designation 

Bit : command reject 

1 : intervention required 

2 : bus-out check 
3:- 

4 : data check 

5 : overrun 

6 : autoselect 



: document under read head 

: amount field valid 

: process-control field valid 

: account-number field valid 

: transit field valid 

: serial-number field valid 



Designation 

Bit : command reject 

1 : intervention required 

2 : bus-out check 
3:- 

4:- 

5 : late stacker select 

6 : autoselect 

7 : operator attention 



SENSE INFORMATION SUMMARY ( Cont'd) 

1442 - Card Read-Punch/Card Punch 

Sense Byte Designation 

Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 

5 : overrun 



7:- 



1443 -Printer 

Sense Byte Designation 

tBit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : type bar 

5 : type-bar 
6:- 

7 : - 

2260 - Display Station 

Sense Byte Designation 

Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 
4-7 : - 

231 1 - Disk Storage 

Sense Byte Deisgnation 

Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 

5 : overrun 

6 : track condition check 

7 : seek check 

1 Bit : data check in count area 

1 : track overrun 

2 : end of cylinder 

3 : invalid sequence 

4 : no record found 

5 : file protect 

6 : missing address marker 

7 : overflow incomplete 



SENSE INFORMATION SUMMARY (. . . . Cont'd) 
231 1 - Disk Storage (Cont'd) 

Sense Byte Designation 

2 Bit : unsafe 

1 :- 

2 : serializer check 
3:- 

4 : ALU check 

5 : unselected file status 



Bit : ready 

1 : on line 

2 : unsafe 
3:- 

4 : on line 

5 : end of cylinder 
6:- 

7 : seek incomplete 



5 Bit 0-7 : command in progress when overflow 

incomplete occurs 

2314/2319 - Direct Access Storage 

Sense Byte Designation 

Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 

5 : overrun 

6 : track condition check 

7 : seek check 

1 Bit : data check in count area 

1 : track overrun 

2 : end of cylinder 

3 : invalid sequence 

4 : no record found 

5 : file protect 

6 : missing address marker 

7 : overflow incomplete 

2 Bit : unsafe 

1 :- 

2:SERDEScheck 

3:- 

4 : ALU check 

5 : unselected status 
6:- 

7:- 

3 Bit : busy 

1 : on line 

2 : unsafe 

3 : wr current sense 

4 : pack change 

5 : end of cylinder 

6 : multi-module select 

7 : seek incomplete 



I 



SENSE INFORMATION SUMMARY (. . . . Cont'd) 

2314/2319 - Disk Access Storage (Cont'd) 
Sense Byte Designation 



Bit : wrong length record (2314 with multi- 
plex storage control feature only) 
1 : pending status (2314 with multiplex 

storage control feature only) 
2:- 
3:- 
4-7 : Module indentification 



bits 4567 


physical drive 


0000 


A 


0001 


B 


0010 


c 


0011 


D 


0100 


E 


0101 


F 


0110 


G 


0111 


H 


1000 


J 


1111 


module not de 



Bit 0-7 : command in progress when overflow 
incomplete occurs. 



2400 - Magnetic Tape 

Sense Byte Designation 



Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 

5 : overrun 

6 : word count zero 

7 : data converter check 

Bit : noise 
1-2 : B'00' = not existent 
B'Or = not ready 
B'10' = ready and not rewinding 
B'1 1' = ready and rewinding 

3 : seven-track 

4 : at loadpoint 

5 : selected and write status 

6 : file protect 

7 : not capable 

Bit 0-7 : contains the track-in-error indicator 
bits that are set at the end of a read, 
or read-backward command if a data 
check has been encountered. Bits 6 
and 7 on together indicate either more 
than one error or no error found. 

Bit 0: R/WVRC 
1 : LRCR 
2 : skew 
3:CRC 

4 : skew register VRC 

5 : phase encoding 

6 : backward 

7 : C compare 

Bit : echo check 

1 : reject TU 

2 : read clock error 

3 : write clock error 

4 : delay counter 

5 : sequence indicator C 

6 : sequence indicator B 

7 : sequence indicator A 



SENSE INFORMATION SUMMARY (. . . . Cont'd) 

2501 - Card Reader 

Sense Byte Designation 

Bit : command reject 

1 : intervention required 

2 : bus-out checl< 

3 : equipment checl< 

4 : data check 

5 : overrun 
6:- 
7:- 

2520 - Card Read-Punch/Card Puncii 

Sense Byte Designation 



Bit : command reject 

1 : intervention requir 

2 : bus-out checl< 

3 : equipment ciieck 

4 : data check 

5 : overrun 



2540 - Card Reader/Card Punch 





Sense Byte 


Designation 







BitO 
1 
2 
3 
4 
5 
6 
7 


command reject 
intervention required 
bus-out check 
equipment check 
data check 






unusual command 


2560 


- Multifunction Card Machine 






Sense Byte 


Designation 



Bit : command reject 
1 : intervention required 
2:- 

3 : equipment check 

4 : data check 

5 : feed/Machine check 

6 : no card available 

7 : print operation in progress 

Bit : cover interlock/punch pusher check 

1 : jam bar check 

2 : corner station check 

3 : call 8 to 9 feed check 

4 : print station feed check 

5 : punch station feed check 

6 : read station feed check 

7 : input station feed check 

Location of individual card: 
Bit : secondary select 

1 : card in punch station 

2 : preprint SC7 exposed 

3 : prepunch SC5 exposed 

4 : prepunch SC4 exposed 

5 : preread SC3 exposed 

6 : preread SC2 exposed 

7 : input station SCI exposed 



SENSE INFORMATION SUMMARY (. . . . Cont'd) 

2560 - Multifunction Card Machine ( Cont'd) 



Designation 

Stacker Select Information 
Bit : primary card 

1 : binary value 4 

2 : binary value 2 

3 : binary value 1 

4 : secondary card 1 

5 : binary value 4 

6 : binary value 2 

7 : binary value 1 



:ion 



Stacker Select Informat 
Bit : primary (0) 
secondary (1) 

1 : binary value 4 

2 : binary value 2 

3 : binary value 1 

4 : primary (0) 

secondary (1) 

5 : binary value 4 

6 : binary value 2 

7 : binary value 1 

Stacker Select Information; 
Bit : primary (0) 
secondary (1) 

1 :4 

2:2 

3:1 

4 : primary (0) 

secondary (1) 
5:4 
6:2 
7: 1 

Card column in which first (possibly only) 
error was detected: 
Bit : multi data check 

1 : binary value 64 

2 : binary value 32 

3 : binary value 16 

4 : binary value 8 

5 : binary value 4 

6 : binary value 2 

7 : binary value 1 



card at primary 
prepunch station 



card at secondary 
prepunch station 



card at punch or 
preprint station 



card after print 
station 



card at corner station 



card in stacker pocket 
(was just stacked) 



2596 - Card Read-Punch 



Sense Byte 


Designation 





Bit : comnrrand reject 




1 : intervention required 




2 : bus-out check 




3 : equipment check 




4 : data check 




5 : overrun 



2671 - Paper Tape Reader 
Sense Byte 




Designation 

Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 
5:- 



SENSE INFORMATION SUMMARY (. . . . Cont'd) 



Sense Byte Designation 

Bit : command reject 



intervention required 
2:- 

3 : equipment check 

4 : data check 

5 : chain buffer parity check 

6 : no channel found 

7 : channel 9 

Bit 0-7:- 

Bit : interlock (chain gate open) 

1 : form check (jam) 

2 : coil protect check 

3 : subscan ring check 

4 : chain buffer address register check 

5 : hammer unit shift check (model 1 only) 

6 : any hammer on check 

7 : device ready check 

Bit : - 
1 :- 
2:- 

3 : carriage inhibit check 
4:- 
5:- 

6 : step check 

7 : move check 

Bit : hammer reset failure check 

1 : no fire check 

2 : misfire check 

3 : print data buffer parity check 

4 : check bit buffer parity check 

5 : chain buffer parity check 

6 : buffer address register check 

7 : clock check 

Bit : open coil check 
1-7:- 



I 



3210/3215 - Console Printer Keyboard 

Sense Byte Designation 

Bit : command reject 

1 : intervention required 
2:- 

3 : equipment check 
4-7:- 

PRT1 (3203-4, 3203-5, 3211, 3289) 



Designation 


BitO 
1 
2 


: command reject 

: intervention required 

: bus-out check 


3 

4 
5 
6 

7 


: equipment check 

: data check 

: buffer parity check 

: load check 

: channel 9 


BitO 
1 
2 
3 
4 


: command parity 
: print check 
: print quality 
: line position check 
: forms check 


5 
6 


: command suppress 
: mechanical motion 



SENSE INFORMATION SUMMARY (. . . . Cont'd) 
PRT1 (3203-4, 3203 -5, 3211, 3289) (Cont'd) 
Sense Byte Designation 

2 Bit : carriage failed to move 

1 : carriage sequence check 

2 : carriage stop 

3 : platen failed to advance 

4 : platen failed to retract 

5 : forms jam 

6 : ribbon motion 

7 : train overload 

3 Bit : UCSB parity 

1 : PLB parity 

2 : FCB parity 

3 : coil protect 

4 : hammer fire check 

5 : service aid 

6 : UCSAR sync check 

7 : PSE sync check 

4 Bit 0-7 : information used by service personnel 

5 Bit 0-7 : - 
3272 - (3270 Local) 

Sense Byte Designation 

Bit : command reject 

1 : intervention required 

2 : bus out check 

3 : equipment check 

4 : data check 

5 : unit specify 

6 : control check 

7 : operation check 

FBM (3310 and 3370) Disk Storage 



1 Bit : permanent error j 

1 : (unused) 

2 : (unused) 
3 : (unused) 

4 : (unused) 

5 : file protected ( 

6 : write inhibited 

7 : operation incomplete I 

2 Bit : check data error 

1 : correctable ! 

2 : (unused) 

3 : environmental data present ( 

4 : (unused) 

5 : (unused) 

6 : (unused) 

7 : only logging required 

3-6 physical address 

7 Bit 0-3 : hex: format number 

4-7 : hex: message code 

8-23 only for diagnose information 



Sense Byte 


Designation 





Bit : command reject 




1 : intervention required 




2 : bus out parity (not used) 




3 : equipment check 




4 : data check 




5 : overrun 




6 : (unused) 




7 : (unused) 



SENSE INFORMATION SUMMARY (. . . . Cont'd) 

3330 - Disk Storage 

Sense Byte Designation 

Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 

5 : overrun 



Bit : permanent error 

1 : invalid track format 

2 : end of cylinder 
3:- 

4 : no record found 

5 : file protected 

6 : w/rite inhibited 

7 : operation incomplete 

Bit : - 

1 : correctable 

2 :- 

3 : environmental data present 
4:- 



7 :- 

Bit 0-7 : restart command 

Bit 0-1 : storage control identification 
2-7 : physical drive identification 



I 



bits 2 to 7 


physical drive 


111000 


A 


110001 


B 


101010 


C 


100011 


D 


011100 


E 


010101 


F 


001110 


G 


000111 


H 



Bit 0-7 : identify the eight low-order bits of 

the cylinder address in the most recent 
seek argument 

Bit : reserve 

1 : cylinder number (high order bit of cylinder address) 

2 : difference 

3: 16 ) 

4:8) 

5:4 ) head number 

6:2 ) 

7: 1 ) 

Bit 0-3 : format type of remaining sense bytes (8-23) 
4-7 : encoded error message 

Meaning depends on format type 



3340 - Disk Storage 

Sense Byte Designation 

Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 

5 : overrun 

6 : track condition check 

7 : seek check 



SENSE INFORMATION SUMMARY (. . . . Cont'd) 

3340 - Disk Storage 

Sense Byte Designation 

1 Bit : permanent error 

1 : invalid track format 

2 : end of cylinder 
3:- 

4 : no record found 

5 : file protected 

6 : write inhibited 

7 : operation incomplete 

2 Bit : RPS feature present 

1 : correctable 
2:- 

3 : environmental data present 



6 : data module size ) 01 = 35MB 

7 : data module size ) 10 = 70MB 

3 Bit 0-7 : resjart comrpand 

4 Physical drive identification: 
Bit : drive A 

1 : drive B 

2 : drive C 

3 : drive D 

4 : drive E 

5 : drive F 

6 : drive G 

7 : drive H 

5 Bit 0-7 : Identifies the eight low-order bits of the 

cylinder address in the most recent seek argument 

6 Bit 0-2 : identifies the three high-order bits of the cylinder«ddress 

3:- 

4:8 ) 
5:4 ) 



7 Bit 0-3 : format type of remaining sense bytes (8-23) 

4-7 : encoded error message 

8-23 Meaning depends on format type 

3344 - Direct Access Storage (3340 Mode) 
Sense Byte Designation 

Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 

5 : overrun 

6 : track condition check 

7 : seek check 

1 Bit : permanent error 

1 : invalid track format 

2 : end of cylinder 
3:- 

4 : no record found 

5 : file protected 

6 : write inhibited 

7 : operation incomplete 

2 Bit : RPS feature present 

1 : correctable 
2:- 

3 : environmental data present 

4 : Compatibility Mode / 3344 
5: HDASize3Bit 
6:HDASize2Bit 
7:HDASize1 Bit 

1-34 



SENSE INFORMATION SUMMARY (. . . . Cont'd) 

3344 - Direct Access Storage (Cont'd) 

Sense Byte Designation 

3 Bit 0-7 : restart command 

4 Controller device address 
Bit : Controller Addr. Bit 2 

1 : Controller Addr. Bit 1 

3 : y Controller Device Address 



5 : Device Addr. Bit 4 

6 : Device Addr. Bit 2 

7 : Device Addr. Bit 1 

5 Bit 0-7 : Identifies the eight low-order bits of the 

cylinder address 

6 Bit 0-3 : Identifies the four high-order bits of the 

cylinder address 
0: 1024 
1 : 512 
2: 256 
3 : 2048 
4:8 ) 

5-4 ) 

head number 
6:2 ) 
7:1 ) 

7 Bit 0-3 : format type of remaining sense bytes (8-23) 

4-7 : encoded error message 

8-23 Meaning depends on format type 

3350- Direct Access Storage 

Sense Byte Designation 

Bit : command reject 

1 : intervention required 

2 : channel bus out parity 

3 : equipment check 

4 : overrun 

5 : not used 
7 : not used 

1 Bit : permanent error 

1 : invalid track format 

2 : end of cylinder 

3 : not used 

4 : no record found 
• 5 : file protected 

6 : write inhibited 

7 : operation incomplete 

2 Bit : not used 

1 : correctable 

2 : not used 

3 : environmental data present 

4 : computibility mode 

5 : not used 

6 : not used 

7 : not used 

3 Bit 0-7 : restart command 

4 Bit 0-7 : physicci drive identification 

Bit: physical drive 



2:C 
3: D 

4: E 
5:F 
6:G 



SENSE INFORMATION SUMMARY (. . . . Cont'd) 
3350 - Direct Access Storage (Cont'd) 



Sense Byte Designation 

5 Bit 0-7 : low order logical cylinder address 

Bit: Value 



128 

64 



7: 1 

Bit 0-2 : Identifies the three high-order bits of 

the cylinder address 
Bit : CE Cylinder 
1 : 3330- 11 =512 
3330 - 1 = 256 



2: 


3330 - n = 256 
3330 - 1 = 


3: 
4 : 
5: 
6: 
7; 


16 ) 
8 ) 
; 4 ) Head number 
: 2 ) 
: 1 ) 



Bit 0-3 : FORMAT TYPE of rennaining sense bytes (8-23) 
Meaning depends on format type (see 3350 MLM) 



3370 - Disk Storage 






Sense Byte 


Designation 


Format 





Bit : command reject 
1 : intervention required 




1 




2 : bus out parity (not used) 







3 : equipment check 


1 




4 : data check 


4 




5 : overrun 







6 : (unused) 


- 




7 : (unused) 


- 


1 


Bit : permanent error 


any 




1 : (unused) 


- 




2 : (unused) 


— 




3 : (unused) 


— 




4 : (unused) 


- 




5 : file protected 







6 : write inhibited 


— 




7 : operation incomplete 





2 


Bit : check data error 


4 




1 : correctable 


5 




2 : (unused) 


- 




3 : environmental data present 


6,4,1 




4 : (unused) 


- 




5 : (unused) 


— 




6 : (unused) 


- 




7 : only logging required 


- 


3-6 


physical address 





Bit 0-3 : hex: format number 
4-7 : hex: message code 

Only for diagnose Information 



SENSE INFORMATION SUMMARY ( Cont'd) 

3410/3411 -Magnetic Tape 

Sense Byte Designation 

Bit : command reject 

1 : intervention required 

2 : bus-out checl< 

3 : equipment checl< 

4 : data check 

5 : overrun 

6 : word count zero 

7 : data converter checi< 

1 Bit : noise 

1-2 : B'OO' = non-existent 
B'Or = not ready 
B'10' = ready and not busy 
B' 11 ' = ready and busy 

3 : seven track 

4 : at load point 

5 : write status 

6 : file protected 

7 : not capable 

2 Bit 0-7 : track in error bits 

3 Bit : VRC 

1 : multiple track error (PE) or LRC (NRZI) 
2 : skew 

3 : end data check (PE) or CRC (NRZI) 

4 : envelope check (PE only) 

5 : phase encoding 

6 : backword 

7 : - 

4 Bit : tape unit positioning check 

1 : tape unit reject 

2 : end of tape 
3:- 

4 :- 

5 : diagnostic track check 

6 : tape unit check 

7 : illegal command 

5 Bit : new subsystem 

2 : write tape mark check 

3 : PE identification burst 

4 : PE compare 

5 : tachometer check 

6 : false end mark 

7 : RPQ 

6 Bit : seven track 

1 : short gap mode 

2 : dual density 
4-7 : tape unit model 

7 Bit : lamp check 

1 : left column check 

2 : right column check 

3 : ready reset 

4 : data security erase 
5-7:- 

8 Bit : - 

1 : feedthrough 
2:- 

3 : end velocity check 

4 : no read-back data 

5 : start velocity check 



I 



SENSE INFORMATION SUMMARY (. . . . Cont'd) 

3420/3803 - Magnetic Tape 

Sense Byte Designation 

Bit : command reject 

1 : intervention required 

2 : bus-out checl< 

3 : equipment check 

4 : data checl< 

5 : overrun 

6 : word count zero 

7 : data converter checl< 

1 Bit : noise 

1-2 : B'OO' = non-existent 
B'01' = not ready 
B'10' = ready and not rewinding 
B'11' = ready and rewinding 

3 : seven tracl< 

4 : at load point 

5 : write status 

6 : file protected 

7 : not capable 

2 Bit 0-7 : track in error bits 

3 Bit : VRC 

1 : multiple track error (PE) or LPC (NRZI) 
2 : skew 

3 : end data check (PE) or CRC (NRZI) 

4 : envelope check (PE only) 

5 : phase encoding 

6 : backward 

7 : C-compare 

4 Bit : ALU hardware error 

1 : reject tape unit 

2 : tape indicate 

3 : write trigger VRC 

4 : microprogram detected error 

5 : LWR 

6 : tape unit check 

7 : RPQ 

5 Bit : new subsystem 

1 : new subsystem 

2 : write tape mark check 

3 : PE ID burst check 

4 : start read check 

5 : partial record 

6 : excessive postable or tape mark 

7 : RPQ 

6 Bit : seven track 

1 : write current failure 

2 : dual density 

3 : NRZI density 
4-7 : tape unit model 

7 Bit : lamp failure 

1 : tape bottom left 

2 : tape bottom right 

3 : reset key 

4 : data security erase 

5 : erase head 

6 : air bearing pressure 

7 : load failure 

8 Bit : IBG drop while writing 

1 : feed through check 

2 : SDR counter 

3 : early begin readback check 

4 : early ending readback check 

5 : slow begin readback check 

6 : slow ending readback check 

7 : velocity retry/restart 



SENSE- INFORMATION SUMMARY (. . . . Cont'd) 

3420/3803 - Magnetic Tape (. . . Cont'd) 
Sense Byte Designation- 



Bit : SDR counter 

1 : velocity change during write 
2-3 : SDR counter 
4:- 
5:- 
6: - 
7 : tape control reserved 

Bit : command status reject 

1 :- 

2 : control status reject 

3 : no block on record readback check 

4 : WTM not detected block 

5 : tachometer start fail 
6:- 

7 : velocity check 

Bit : B bus parity error, ALU 1 

1 : - 

2 : low RGB parity/low IC/parity on branch instr. 

3 : high IC/high ROS reg parity 

4 : micro program detected hardware error 

5 : D bus parity error, ALU1 
6:- 

7 : branch condition error, ALU2 

Bit : B bus parity error, ALU 2 
1 :- 
. 2 : low ROS parity/low IC/parity on branch instr. 

3 : high IC/BC/high ROS reg parity 

4 : microprogram detected hardware error 

5 : D bus parity error, ALU 2 
6:- 

7 : branch condition error, ALU 2 



13 Bit 0-1 : tape control density 

2-7 : tape control unique ID high 

14 Bit 0-7 : tape control unique ID low 

15 Bit 0-7 : tape unit unique ID 

16 Bit 0-7 : tape unit unique ID 



Bit 0.: two-channel switch 
1-3 : tape control device switch features 
4-7 : EC level of tape control 

Bit : Power check/air flow 



4-7 : EC level of tape unit 

Bit : primed for device and tape uni 

1 : primed for device and tape uni 

2 : primed for device and tape uni 

3 : primed for device and tape uni 

4 : primed for device and tape uni 

5 : primed for device and tape unit 2 

6 : primed for device and tape unit 1 

7 : primed for device and tape uni 

Bit : primed for device and tapB uni 

1 ; primed for device and tape uni 

2 : primed for device and tape uni 

3 : primed for device and tape uni 

4 : primed for device and tape uni 

5 : primed for device and tape 

6 : primed for device and tape uni 

7 :, primed for device and tape uni 



SENSE INFORMATION SUMMARY {. . . . Cont'd) 

3420/3803 - Magnetic Tape ( Cont'd) 

Sense Byte Designation 

21 Bit : load button depressed 

1 : left reel turning 

2 : rigiit reel turning 

3 : tape present 

4 : reels loaded 

5 : load rewind 

6 : load complete 

7 : load check 

22 Bit 0-7 : FPU identifiers for tape control 

23 Bit 0-7 : FPU identifiers for tape control 

3504/3505/3525 - Card I/O 



Sense Byte 


Designation 





Bit : command reject 




1 : intervention required 




2 : bus-out check 




3 : equipment check 




4 : data check 

5:- 

6 : abnormal format reset 






7 : permanent error key 


1 


Bit : permanent error 




1 : automatic retry 




2 : motion malfunction 




3 : retry after intervention complete 




4-7:- 


2-3 


Used for diagnostic purposes only 


3540 - Diskette 




Sense Byte 


Designation 





Bit : command reject 




1 : intervention required 




2 : bus-out check 




3 : equipment check 




4 : data check 



5-7 : - 

Bit : permanent error 

1 : automatic retry 

2 : motion malfunction 

3 : retry after intervention complete 

4 : special record transferred 
5-7:- 

Used for diagnostic purposes only 

Bit 0-7 : cylinder address in binary 

Bit 0-7 : head address, must be binary zero 

Bit 0-7 : record address in binary 



3881 - Optical Mark Reader 



Sense Byte 



Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 



6 : unusual command sequence 



SENSE INFORMATION SUMMARY (. . . , Cont'd) 

3886 - Optical Cnaracter Reader 



Sense Byte 


Designation 





Bit : command reject 




1 : intervention required 




2 : bus-out check 




3 : equipment check 




4 : - 




5:- 




6 : non-initialized 




7 : RCP error 


1 


Bit : - 




1 : mark check 




2 : invalid format 




3:- 




4 : incomplete scan 




5:- 




6 : non-recovery 




7 : outboard 


5203 - Printer 




Sense Byte 


Designation 





Bit : command reject 




1 : intervention required 




2:- 




3 : equipment check 




4 : data check 




5 : chain buffer parity check 




6 : no channel found 




7 : channel 9 



Bit 0-7 : - 

Bit : interlock (chain gate open) 

1 : forms check (jam) 

2 : coil protect check 

3 : subscan ring check 

4 : chain buffer address register check 

5 : hammer unit shift check 

6 : any-hammer-on check 

7 : thermal overload 



4 




Bit : hammer reset failure check 

1 : no fire check 

2 : misfire check 

3 : print data buffer parity check 

4 : check bit buffer parity check 

5 : chain buffer parity check 

6 : buffer address register check 

7 : clock check 


5 




Bit : open coil check 
1-7 : - 


5424/5425 - 


- Multifunctii 


Dn Card Unit 


Sense Byte 


Designation 







Bit : command reject 



. : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 
5:- 

6 : no card available 

7 :- 



SENSE INFORMATION SUMMARY {. . . . Cont'd) 

5424/5425 - Muttifunction Card Unit (. . . . Cont'd) 
Sense Byte Designation 

1 Bit : readchecl< 

1 : punch check 
2:- 

3 : print data check 

4 : print clutch check 

5 : hopper check 

6 : feed check 
7:- 

2 Bit : - 

■• ■• - 

2 : card in primary wait station 

3 : card in secondary wait station 

4 :NPRO allowed 

5 : hopper cycle not complete 

6 : card in transport counter bit 2 

7 : card in transport counter bit 1 



Contains a hexadecimal number whose value can represent 
feedchecks and emitter checks in the 5425 

Defines the card column group and tier where the error was 
detected which caused the first read check or punch check of 
a card cycle: 
Bit : multiple error 
1-2 : B'OO' Tierl 
B'Or Tier 2 
B'10' Tier 3 
3-7 : B'OOOOO' column group 1 
B'OOOOr column group 2 

I I I I I 
B'11111' column group 32 

Bit : D row miscompare 

1 : C row miscompare 

2 : B row miscompare 

3 : A row miscompare 

4 : 8 row miscompare 

5 : 4 4ow miscompare 

6 : 2 row miscompare 

7 : 1 row miscompare 



6-10 




Forms a table of the five most recent command strings 
Bit : Secondary 

1 : print four lines 

2 : stacker select M2 

3 : stacker select M3 

4 : punch 

5 : feed command sample 

6 : print 

7 : read 


8809 - Tape 


Unit 




Sense Byte 


Designation 







Bit : command reject 
1 : intervention required 
2:- 
3 : equipment check 










4 : data check 






5 : overrun 






6:- 






7 :- ^ 


1 




Bit : noise 






1 : tape unit status A 






2 : tape unit status B 






3: - 






4 : at load point 






5 : write status 






6 : file protected 






7 : not capable 



SENSE INFORMATION SUMMARY (. . . . Cont'd) 



- Tape Unit (Cont'd) 



Sense Byte Designation 

2 

3 



Bit 0-7 


: represent track i 


BitO: 


128 ERP number 


1 : 


64 ERP number 


2: 


32 ERP number 


3: 


16 ERP number 


4: 


8 ERP number 


5: 


4 ERP number 


6: 


2 ERP number 


7 : 


1 ERP number 



Bit : - 

1 :- 

2 : tape indicate 

3 : permanent error 

4 : host detected error 

5 : loop write to read error 

6 : not used 

7 : not used 

Bit : - 



3 : PE-ID burst checi< 



Contains all zeros 

Bit : 8 format code 

1 : 4 format code 

2 : 2 format code 

3 : 1 format code 

4 : Data security erase 

5 :- 
6: - 



Sense bytes 8-31 are only used for hardware diagnostics 



DOC - Display Operator Console 

Sense byte Designation 



Bit : command reject 
1 : intervention required 
2:- 

3 : equipment check 

4 :- 
5:- 
6:- 

7 : operation check 



CHAPTER II 

DOS/VSE GENERAL INFORMATION 



IPL CONTROL STATEMENTS 



Operation 



cuu[(k)],device-type[,ss|,ssss|,ssssss] 



The ADD command is used to define the 
physical devices attached to the system. 

Note: The X' "notation is no longer required 
but is still supported for compatibility 
reasons. 

cuu Indicates the channel and unit 

number of the device to be added- 

k Can be specified as either S or a 

decimal number from to 255: 
S indicates that the device can be 
switched (that is, physically 
attached to two adjacent channels). 
The designated channel is the 
lower of the two channels. 
to 255 indicates the priority of 
a device that cannot be switched, 
with indicating the highest 
priority. If k is not given, the 
assumed priority is 255. 

device- Specifies the actual device 
type {2400T9, 1443, etc.). See device 

type codes in Figure 1. 

ss Device specifications (see ASSGN 

ssss Statement). If absent, the follow- 

ssssss ing values are assigned: CO for 

9-track tapes (2400, 3410 series) 
DO for 9-track tapes (3420 series) 
60 for 8809 Magnetic Tape Unit 
90 for 7-track tapes 
00 for non-tapes 
00, 01 , 02, and 03 are invalid as 
ss for magnetic tape, 
ss is required for a 3284/3286/ 
3287 printer used as a hard-copy 
■ device for a 3277 operator con- 
sole. The required entry is 02. 
ss specifies SADxxx (Set Address) 
requirements for IBM 2702 lines: 

00 for SADO 
OlforSADI 

02 for SAD2 

03 for SAD3 

This information is not accepted 
on the ASSGN statements, 
ss is required for 1270, 1275, 
1419, 1419P, and 1419S device 
types. It specifies the external 
interrupt bit associated with mag- 
netic ink or optical character 
readers. The settings 01 through 
20 correspond to the external 
interrupt code in low real storage 
byte 87, bits 7 through 2 respect- 
ively. The corresponding external 
lines to which the control units 
are attached are as follows: 

01 byte 87 bit 7 

02 byte 87 bit 6 

04 byte 87 bit 5 
08 byte 87 bit 4 
10 byte 87 bit 3 
20 byte 87 bit 2 

The ss parameter specifies whether 
or not the error correction feature 
is present on an IBM 1018 Paper 
Tape Punch with 2826 Control 
Unit Model 1. 



IPL CONTROL STATEMENTS { Cont'd) 



Operation 


Operand 


Remarks 


ADD 
(Cont'd) 




ss can be: 

00 no error correction feature 

01 error correction feature 

For the 3704 and the 3705, ss is 
required and must be specified as 
one of the following: 

01 Type 1/4 channel adapter 

02 Type 2/3 channel adapter 
10 for 4300 ICA 

For the 2703 of the Model 1 15 or 
125, ss, ssss, or ssssss is used to 
specify the line mode setting for 
a Start/Stop line or a BSCIine. 
The bit settings of the line mode 
specification for each line involved 
are explained in IBM System /370 
Model 115 Functional Charac- 
teristics, and in IBM System /370 
Model 125 Functional Charac- . 
teristics, repectively. 
The line mode setting is not accep- 
tecf on the ASSGN statement. If a 
one or two byte value is specified, 
the specified value is right-justified 
and the rest of the three bytes is 
filled with zeros. 


DEF 


SYSREC=cuu,SYSCAT=(cuu|UA)[,SYSDMP=cuu] | | 




The DEF command is used to assign SYSREC, 
the logical device for the system recorder 
and hard-copy files SYSCAT, the logical 
device for the VSAM-E master catalog 
SYSDMP, the logical device for the high- 
speed system dump. 

SYSCAT=cuu Indicates the channel and 

unit number of the physical device 
to be assigned to SYSCAT. 

SYSREC=cuu Indicates the channel and 

unit number of the physical device 
to be assigned to SYSREC. 

SYSDMP=cuu Indicates the channel and 

unit number of the physical device 
assigned to SYSDMP. SYSDMP 
can be assigned to any CKD or 
FBA device. The assignment can- 
not be changed until the next IPL. 


DEL 




The DEL command is used to delete a device 
from the PUB table. 

cuu Indicates the channel and unit 

number of the device to be deleted. 


DPD 


[TYPE= N|F ],UNIT=cuu, 
CYL=nlBLK=n [,VOLiD=xxxxxx] 


The DPD command, which is mandatory, 
is used to define the pape data set. 
The operands of the DPD command may be 
given in any order. 

TYPE=N TYPE=N is the default and indi- 
cates that the page data set need 
not be formatted. 
If TYPE=N is specified but the 
page data set does not exist or the 
extent limits have been changed, 
TYPE=N is ignored and the page 
data set is formatted during IPL. 

TYPE=F Indicates that the page data set is 
to be formatted duringlPL. For- 
matting during IPL is required if 
part of the formatted extent has 
been destroyed. The TYPE ope- 
rand is ignored for FBA devices. 



IPL CONTROL STATEMENTS (. . . . Cont'd) 



Operation 


Operand 


Remarks 


DPD 
Cont'd 




UNIT=cuu Specifies the channel and unit 
^ number of the device tha t is to 
contain the page data set. 

CYL=n Specif ies, for CKD devices, the 

sequential number of the cylinder, 
relative to zero, w/here the page 
data set is to begin (in decimal). 

BLK=n Specifies, for FBA devices, the 
sequential number of the block, 
relative to zero, where the page 
data set is to begin (in decimal). 

VOLID=xxxxxx Identifies the volume 

serial number (one to six alpha- 
betic or numeric characters) of 
the disk pack that contains the 
page data set (for label checking). 
If this operand is omitted, the 
volume serial number is not 
checked. 


SET 


[DATE=value 1. CL0CK=value2] 


value 1 1 n one of the following formats: 
mm/dd/yy or 
mm: month (01-12) 
dd:day (01-31) 
yy: year (00-99) 

value 2 In the following format: 
hh/mm/ss, 

hh: hours (00-23) 
mm: minutes (00-59) 
ss: seconds (00-59) 

EAST Specifies a geographical position 
east of Greenwich. 

WEST Specifies a geographical position 
west of Greenwich. 

hh/mm A decimal value which indicates 
the difference in hours and 
minutes between local and Green- 
wich Mean Time, 
hh : 0-23 
mm: 0-59 

Note Required statement. If any ADD or 
DEL commands are required, they must 
precede the SET command. 


SVA 


[SDL=n][,PSIZE=nK][,GETVIS=nK] 


SDL=n Specifies the decimal number of 
entries in the system directory list 
to be reserved for user phases and 
non SVA-eligible IBM-supplied 
phases, in addition to the phases 
loaded automatically during IPL. 
For a list of those phases that are 
automatically loaded into the 
SVA during IPL, refer to DOS/VSE 
System Generation. Do not spe- 
cify entries for these phases, as 
this is done by IPL. The maximum 
number that can be specified is 
963. 



IPL CONTROL STATEMENTS ( Cont'd) 



Operation 


Operands 


Remarks 






PSIZE=nK Specifies the size of the area 
within the SVA which is to be 
reserved for user phases, n must 
be a decimal number and a mult- 
iple of 2. The specified size should 
be large enough for the user 
phases and for a maintenance area 
which is required when a phase in 
the system core image library, 
with a copy in the SVA, is re- 
placed. 

Do not specify space for the phases 
loaded automatically into the SVA 
during IPL, as IPL will reserve the 
necessary space. 

GETVIS=nK Indicates the size of the addi- 
tional system GETVIS area which 
you can specify beyond the mini- 
mum size allocated by the system, 
n must be a decimal number and 
a multiple of 2. 

Note that SET, DPD, and DEF may be 
entered at any time during IPL. ADD and 
DEL must precede any DEF, DLA, DPD, or 
SVA command(s). SVA must be the last 
IPL command. 



JOB CONTROL - AND ATTENTION ROUTINE COMMANDS 
Job Control Overview 



Type of Command or Statement 


Operation 


Valid for | 


JCS 


AR 


JCC 


Job Identification 


JOB 

/& 

/ 


X 
X 






User Identification 


ID 


X 






File Definition 


DLBL 

EXTENT 

TLBL 

/* 


X 

X 
X 






Pass Information to Operator 


* 


X 






Pass Information to Program 


DATE 

LBLTYP 

OPTION 


X 








OVEND 


X 




X 




UPSI 


X 






Job Stream Control 


BATCH 




X 






CANCEL 




X 


X 




PAUSE 


X 


X 


X 




PRTY 




X 






START 




X 






STOP 






X 




TPBAL 




X 






UN BATCH 






Note 


Setting System Parameters 


ALLOC 




X 


X 




ALLOCR 




X 


X 




SET 






X 




SIZE 




X 


X 




STDOPT 


X 




X 



Note: Valid only in a Foreground Partition 



Name 


Operation 


Operand 


Remarks 


Accepted 
by 




ALLOC 


Fn=mK[,Fn=mK] 


n Indicates the number of 
the foreground partition. 

m Indicates the amount of 
storage to be allocated to 
the specified foreground 
partition, m must not be 
smaller than 128. 


JCC 

AR 




ALLOCR 


PARTITION=mK 
[,PARTITION=mK]... 


partition Indicates the partition 
(BG,F1,F2,...) to which 
storage is to be allocated. 
For compatibility reasons, 
the partition specifications 
BGR and FnR will also be 
accepted. 

m Indicates the amount of 
storage to be allocated to 
the specified partition, 
m should be an even integer, 
any uneven specification is 
rounded up to the nearest 
even integer, m may also 
be zero. 


JCC 
AR 




ALTER 


XXXXXX 


Alters 1 to 1 6 bytes of virtual 
storage. XXXXXX is the hex ad- 
dress where alteration is to start. 


AR 



JOB CONTROL - AND ATTENTION ROUTINE COMMANDS ( Cont'd) 



Operand 



Accepted 
by 



[//] 



For any device: 

[cuu "} 

SVSxx«,K, 

(address-list) 
[sYSyyy ^ 
Fordisl<s:cuu 

(address-list) 

SYSyyy 

DISK 

FBA 

2311 
SYSxxxX2314 

3330 

333QB 

3340 

3340 R 

3350 
For diskettes: 

fcuu 1 

(address-list) 
SYSxxxX SYSyyy I 

DISKETTE f 
[3540 J 

For tapes: 

cuu 

(address-li^) 

SYSyyy 

TAPE 

2400T7 

2400T9 

3410T7 

3410T9 

3420T7 

3420T9 



For remarks see end of this 
statement ^^ 



I JOS 
I JCC 



rTEMP"! 

[,permJ 



Ttemp' 

[,PERM_j 



[,VOL=volserno][,SHR] 



r,TEMP"| 

[,permJ 



[,VOL=volserno] 



• [:aLt] [:pIrm] ..VOL=vo,se,no, 



ASSGN 
(Cont'd) 



For printers: 
cuu 



SYSxxx,< 



(address-list) 

SYSyyy 

PRINTER 

PRT1 

1403 

1403U 

1443 

3203 

3211 

3800 

3800B 

3800C 

3800BC 

5203 

5203U 



For remarks see 
end of this statement 



rTEMPl 

LpermJ 



JOB CONTROL - AND ATTENTION ROUTINE COMMANDS {. . . . Cont'd) 



Name Operation Operand 



Accepted 
by 



ASSGN 
(Cont'd) 



(read) punches: 
cuu 

(address-list) 
SYSyyy 
PUNCH 
1442N1 
1442N2 
2520B1 
2520B2 
2520B3 
2540P 

2560 

2596 

3525P 

3525RP 

5424 

5425 



[:h3 



fjEMP] 

[,permJ 



For card readers: 



(address-list) 
SYSyyy 

reader 

1442N1 
2501 
2520B1 
2540R 

2560 

2596 

3504 

3505 

3525RP 

5424 

5425 



[:h3 



t"^] 



r,TEMPl 

[,permJ 



SYSyyy 



device- 
class 



device- 
type 



can be SYSRDR, SYSIPT, SYSIN, 
SYSPCH, SYSLST, SYSOUT, 
SYSLOG, SYSLNK, SYSRLB, 
SYSSLB, SYSCLB or 
SYSOOO-SYS 240. 
SYSCAT and SYSREC can only be 
assigned by the DEF command 
at IPLtime. For compatibility 
reasons, an assignment for SYSREC 
entered from SYSRDR is ignored 
and processing continues; 
if entered from SYSLOG, the 
assignment Is rejected. 
c=channel number 
uu=unit number 

a list of up to seven device addresses 
in the form: 
(cuu cuu) 



unassign and ignore (invalid for 
SYSCLB, SYSRDR, SYSIPT, 
SYSIN) 

any system or programmer 
logical unit. 

READER, PRINTER, PUNCH, 
TAPE, DISK, CKD,FBA, or 
DISKETTE 

device code of any supported 
device 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (. . . Cont'd) 



Name Operation Operand 



Accepted 
by 



ASSGN 
(Cont'd) 



PERM 
TEMP 

VOL= 

volserno 



density (magn. tape only) 



ss 


BPI 


Parity 


Transl. Conv. 








feat 


feat 


10 


200 


odd 


off 


on 


20 


200 


even 


off 


off 


28 


200 


even 


on 


off 


30 


200 


odd 


off 


off 


38 


200 


odd 


on 


off 


50 


556 


odd 


off 


on 


60 


556 


even 


off 


off 


68 


556 


even 


on 


off 


70 


556 


odd 


off 


off 


78 


556 


odd 


on 


off 


90 


800 


odd 


off 


on 


AO 


800 


even 


off 


off 


A8 


800 


even 


on 


off 


BO 


800 


odd 


off 


off 


B8 


800 


odd 


on 


off 


CO 


800 


single 


dens 


9tr. 


CO 


1600 


single 


dens. 9 tr. 


CO 


1600 


dual 


dens. 9 tr. 


C8 


800 


dual 


dens 


9tr. 


DO 


6250 


single/dual dens. 9 tr. 


DO 


6250 


dual 


dens. 9 tr. 


90 


1600 


IBM 8809 STREAMING: 
High speed and long gap 


30 


1600 


^ IBM 8809 STREAMING: 
High speed and short gap 


50 


1600 


IBM 8809 START STOP: 
Low speed and long gap 


60 


1600 


IBM 8809 START STOP: 






Low speed a 


id short gap 



specifies alternate tape unit. 
(Invalid for SYSIPT) 

specifies input hopper 1 for input 
on 2560, 5424 or 5425; 
If neither HI nor H2 is specified, 
HI is assumed 

specifies input hopper 2 for input 
on 2560, 5424 or 5425; 
(invalid for programmers units) 

the assignment is permanent 

the assignment is temporary 

volume serial number of the tape, 
DISK or DISKETTE. . 

indicates the shared option for 
disk devices 



Start or continue processers 



{bG I Fn}[,NODUMP| ,PARTDUMP| ,DUMP][,SYSDMP| ,NOSYSDMP][ 



Cancels execution of current job in specified area 

BG Indicates that the background job 

is to be canceled. 

Fn Indicates that the specified fore- • 

ground job is to be canceled. 

NODUMP Indicate the dump option which is 
PARTDUMP to be in effect until end of job. 
DUMP The meaning of the keywords is the 

NOSYSDMPsame as in the OPTION statement. 



JOB CONTROL- AND ATTENTIC; ROUTINE COMMANDS (. . . . Cont'd) 



Name 


Operation 


Operand 


Remarks 


Accepted 
by 








CLj Indicates that the I/O request for 










the specified device and the asso- 










ciated task is to be canceled. 










Warning: Use only in emergency 










cancel situations {if, for example. 










1 140D REQUEST CANCEL has 










been issued), because you may also 










cancel POWER/VS. 










blank Cancels execution of current job 


JCC 


[//] 


CLOSE 


VSYSxxx 


SYSxxx for magnetic tape 


JCS 






,cuu [,ss. 


SYSPCH 


JCC 






,UA 


SYSLST 








1 ,IGN 


SYSOUT 








,ALT ' 


SYS000-SYS240 








I ,SYSyyyJ 












for DASDUCC only) 
SYSIN 
SYSRDR 
SYSIPT 
SYSPCH 
SYSLST 
cuu,ss,UA,IGN,ALT 

Values as described in ASSGN 












command. 










// 


DATE 


mm/dd/yy or 
dd/mm/yy 


mm month (01-12) 
day day (01-31) 
yy year (00-99) 


JCS 
' 1 


// 


DLBL 


filename, [file-ID], 


filename One to seven alphameric characters, JCS | 






[date], [codes], 


the first of which must be alphabetic L— 








[,DSF][,BUFSP=n] 


f ile-l D One to forty-four alphameric characters 








[,CAT=filename] 


(one to eight alphameric characters for 








[,BLKSIZE=n] 


the 3540 diskette) 








[,CISIZE=n] 


date One to six characters (yy/ddd) 

codes Two to four alphabetic characters (SD, 
DA, DU, ISC, ISE.VSAM) 

DSF specifies that a data secured file is to be 
created or processed 

BUFSP=n specifies, for a VSAM file to be processed, 
the number of bytes of vitual storage 
(0-999999) to be allocated as bufferspace 

CAT=filename specif ies filename (1 to 7 alphameric 
characters) of the DLBL statement for 
the catalog owing this VSAM file. 

BLKSIZE=n a number from 1 to 32,768 (only valid 
for SAM files on 3350 and 3330-1 1 ) 

CISIZE=n This operand permits specification of an 
FBA control interval size for SAM and 
DAM files or FBA devices in order to 
improve space utilization on such 
devices. A number from 1 to 32,768. 






DSPLY 


ADDRESS 


Displays 16 bytes of virtual 
storage 


AR 




DUMP 


"S 
BG 
Fn 
BGS 




The DUMP command allows the 
operator to DUMP part or all 
of the real and/or virtual address 
area contents on a printer, tape. 








FnS 


,cuu[RUN] 


or disk device (CKD or FBA) 








SVAS 
BUFFER 




Note: There must be no blank 










between the operands. 








addr,addr 




S Same as above however, the contents 








ALL 




of the supervisor area are also dumped. 








^ J 







JOB CONTROL- AND ATTENTION ROUTINE COMMANDS {. . . . Cont'd) 



Operation 



Operand 



Accepted 
by 



DUMP 
(Cont'd) 



BG The contents of the specified partition 
Fn and its associated registers are dumped. 
If a program is running in real mode in 
the specified partition, only the real, 
not the associated virtual partition, is 
dumped. If a program is running in 
virtual mode in the specified partition, 
the virtual parition is dumped, includ- 
ing any fixed pages. The areas acquired 
through GETVIS in the partition are 
also dumped. 

BGS Same as if BG or Fn was specified; 
FnS however, the contents of the supervisor 
area are also dumped. 

SVA The contents of the SVA are dumped. 

SVAS The contents of the SVA and of the 
supervisor are dumped. 

BUFFER The contents of the SDAID buffer 
are dumped on tape or disk. This 
operand is rejected in case of output 
to the printer. 

address,address Specifies storage are between 
the two hexadecimal addresses and 
associated registers. 

cuu Specifies the device on which the out- 
put is to be written. 

run Specifies that the system is to continue 
to run during DUMP command execu- 
tion. 

ALL The contents of the supervisor, the 
SVA, and all partitions are dumped. 



c=0-6 
uu=00-FE(0-254) in hex 



i=00-FE(0-254)inhex 



END or 
ENTER 



End of SYSLOG communications 
END for the 3210 and 3215 printer 
keyboards 
ENTER for DOC 



r[[PGM=]progname][,REAL][,SIZE=size]A 
\PROC=procname [,0V] / 



JCC 
JCS 



PGM=progname one to eight alphameric 

characters. Used only if the program is 
in the core image library 

REAL The respective program is to be 
executed in real mode 

SIZE=size can be nK, AUTO, or (AUTO.nK) 
nK: size of area required 
AUTO: take program size 
(AUTO,nK): take program size plus nK 

PROC=procname Name of cataloged proce- 
dure to be retrieved. One to eight alpha- 
meric characters, the first of which 
must be alphabetic 

OV I ndicates that overwrite statements 
follow EXEC statem.ent 



JOB CONTROL- AND ATTENTION ROLTFINE COMMANDS {, 



Name 


Operation 


Operand 


Remarks 


Accepted 
by 


// 


EXTENT 


[symbolic-unit], 
[serial-number],[type]. 
[sequence-number], 
[relative-track! block], 
[numberof-tracksl blocks; 
[split-cylinder-track] 


symbolic unit: Six alphameric 
characters 

serial number: One to six alphameric 
characters 

jtype: One numeric character 

sequence number: One to three num 
characters 

relative track block: One to five num 
characters (CKD-DEVICES) 

number of tracks/blocks: One to five 
numeric characters (CKD-DE 

split cylinder track: One or two num 
characters 


JCS 




3ric 
eric 

VICES) 
eric 










HOLD 


Fn[,Fn]... 


Causes the assignments for the 
specified foreground partition(s) 
to remain in affect until the end 
of the next job 


JCC 




IGNORE 


blank 


Ignore abnormal condition 


AR 
JCC 


// 


JOB 


jobname [accounting 
information] 


jobname: One to eight alphameric 
characters 

accounting information: One to six- 
teen characters 


JCS 


// 


LBLTYP 


rTAPE'[(nn)]\ 
\NSD(nn) / 


TAPE Used when tape files requir- 
ing label information, are 
to be processed and no non- 
sequential disk files are to 
be processed 

(nn) Optional and is present only 
for future expansion 
(ignored by job control) 

NSD Nonsequential disk files are 
to be processed 

(nn) Largest number of extents 
per single file 


JCS 




LFCB 


cuu, phasename 
[,FORMS=xxxx] 
[,LPI=n][,NULMSG] 


Causes the FCB of printer 
cuu to be loaded 


AR 


[//I 


LISTIO 


' 


fASSGN^ 
SYS 
PROG 
Fn 
ALL 
SYSxxx 
UNITS 
DOWN 
UA 
cuu 

-BG . 


> 


Causes listing of I/O assignments 
onSYSLSTforJCSandSYSLOG 
for JCC 


JCS 
JCC 




LOG 


blank 


Causes logging of job control 
statements on SYSLOG 


JCC 
AR 




LUCB 


cuu, phasename 
[,FOLD][,NOCHK] 
[,TRAIN=xxxxxx] 
[.NULMSG] 


Causes the UCB of printer 
cuu to be loaded 


AR 




MAP 


blank 


Causes a map of area in real and 
virtual storage to appear on 
SYSLOG 


JCC 
AR 



I 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (. . . . Cont'd) 



Name 


Operation 


Operand 


Remarks 


Accepted 
by 




MODE 


flR 




AR 


CE,cuur,l[,xx,y]" 
,D [,XX,y] 

STATUS 


[•as 


[,E=eeee][,T=tttt] 






Changes the mode of operation, 
changes the EFL threshold values 
and gives status information. 

Note: When HIR or ECO is speci- 
fied, at least one of the optional 
operands within these braces must 
be selected. TH is inly valid for 
the Model 145 when ECC, C is 
specified with the MODE command. 




MSG 


{bG I Fn} 


Transfers control to message 
routine 


AR 


Ml \ 


MTC 


opcode, rSYSxxx'\ 
\cuu / 
[,nn] 


opcode BSF, BSR, DSE, ERG, 
FSF, FSR, REW, RUN, 
or WTM 

SYSxxx Any logical unit 

cuu Specifies the channel and 
unit number (in hex) 

nn dec. number (01-99) 


JCS 
JCC 




NEW VOL 


[BG|Fn][,ignore] 


Indicates that a new volume has 
been mounted for the specified 
partition 


AR 




NOLOG 


blank 


Suppresses logging of job control 
statements on SYS LOG 


JCC 
AR 


II 


OPTION 


option 
[.option] . . . 


option: can be any of the following 

LOG Log control statements on 
SYSLST 

NOLOG Suppress LOG option 

DUMP Dumps the registers, super- 
visor area, partition, the 
used part of the system 
GETVIS area, and the SVA 
phase in error if the error 
occured in the SVA. The 
dump will be recorded on 
SYSLST, if assigned, in the 
case of an abnormal program 
end (such as program check). 

PARTDUMP Dump registers, selec- 
ted supervisor control blocks, 
and temporary real or 
virtual partition on SYSLST 
in case of abnormal program 
end. 

NODUMP Suppress DUMP or 
PARTDUMP option 

LINK Write output of language 
translator on SYSLNK for 
linkage editing 

NOLINK Suppress LINK option 


JCS 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (. . . . Cont'd) 



Operation 



Accepted 
by 



OPTION. 
(Cont'd) 



DECK Output object module on 
SYSPCH 

NODECK Suppress DECK option 

EDECK Punch source macro defini- 
tions on SYSPCH 

NOEDECK Suppress EDECK 
option 

ALIGN Align constants and date 
areas on boundaries 

NOALIGN Suppress ALIGN 

option 
LIST Output listing of source 

module on SYSLST 

NOLIST Suppress LIST option 

LISTX Output of object module 
on SYSLST 

SYM Produce symbol table or 
data division map on 
SYSLST 

NOSYM Suppress SYM option 

XREF Output symbolic cross- 
reference list on SYLST 

SXREF The assembler writes the 
simbolic cross-reference 
list on SYSLST; printing 
of all unreferenced labels 
is suppressed 

NOXREF Suppress XREF or 
SXREF option 

ERRS Output listing of all errors 
in source program on 
SYSLST 

NOERRS Suppress ERRS option 

RLD Output listing of RLD 
information on SYSLST 

NORLD Suppress RLD option 

ACANCEL Cancel job if attempt 
to assign device is un- 
successful 

NOACANCEL Await operator 
action if a device cannot 
be assigned 

CATAL Catalog program or 

phase in core image library 
after completion of 
Linkage Editor run 

STDLABEL Causes all DASD or 
tape labels to be written 
on the standard label track 

USRLABEL Causes all DASD or 
tape labels to be written 
on the user label track 

PARSTD Causes all DASD or tape 
labels to be written on 
the partition standard 
label track 



48C 
60C 



48 - character set 
60 - character set 



I 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS ( Cont'd) 



Name 


Operation 


Operand 


Remarks 


Accepted 
by 




OPTION 
(Cont'd) 




SYSPARM=string specifies a value 
for assembler system variable 
symbol and SYSPARM 

SUBLIB=DF Causes assembler and 

ESERV program to retrieve 
nonedited macros and copy- 
books from D-sublibrary 
and edited macros from the 
F-sublibrary of the source 
statement library 

SUBLIB=AE Causes assembler 
and ESERV program to 
retrieve nonedited macros 
from the E-sublibrary and 
edited macros' from the 
E-sublibrary of the source 
statement library 

ONLINE Causes fetching of all 

programs for execution from 
the system core image 
library, although a private 
core image library is assigned 

SYSDMP Indicates that dumps are 
to be written on SYSDMP 

NOSYSDMP Indicates that dumps 
are to be written on 
SYSLST 




[//] 


OVEND 


[comments] 


Indicates end of overwrite state- 
ments for a cataloged procedure 


JCS 
JCC 


[//] 


PAUSE 


[comments] 


Causes pause immediately after pro- 
cessing this statement. PAUSE state- 
ment is always printed on SYSLOG. 
If no 3210, 3215 or DOC is available 
the statement is ignored. 


JCS 
JCC 




PAUSE 


[{f"}''^H 

wheren=1,2,3or4 


Causes pause at end of current job 
step or at end of job 


AR 




PRTY 


blank 

partition [.partition] 


Pn=BG, F1, F2, F3or F4. Allows 
the operator to display or change 
the priority of partitions 


AR 


[//] 


RESET 


1 PROG I 

1 ^'-'- 1 
^ SYSxxx J 


Resets I/O device assignments 


JCS 
JCC 




ROD 


blank 


Causes all SDR counters for all non- 
teleprocessing devices on the recor- 
der file on SYSREC to be updated 
from the SDR counters in main 
storage 


JCC 


// 


RSTRT 


SYSxxx,nnnn[,filename] 


SYSxxx Symbolic unit name of 
the device on which the 
checkpoint records are 
stored. Can be SYSOOO- 
SYSnnn 

nnn four character identification 
of the checkpoint record 
to be used for restart 

filename symbolic name of the 
DASD file to be used for 
restarting 


JCS 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS ( Cont'd) 



Name Operation 



Accepted 
by 



[,UPSI=value 1] 

[,LINECT=value21 

[,RCLST=vaIue3I 

[,RCPCH=value4] 

[,RF=value5] 

[,DATE=value6] 

[,HC=value7] 



value 1: 0, 1 or X 
value 2: standard number of lines 
for output on each page of SYSLST 
value 3: decimal number indicating 
minimum number of SYSLST disk 
records remaining to be written 
before operator warning 
value 4 decimal number indicat- 
ing minimum number of 
SYSPCH disk records 
remaining to be written 
before operator warning 
value 5 defines to the system the 
status of the recorder file 
(IJSYSREC)onSYSREC 
used by the RMSR feature 
TYES y file exists 



I 



RF= 



\C RE ATE/ -create file 



in one of the following 

formats: 

mm/dd/yy or dd/mm/yy 

mm: month (01-12) 

dd: day (01-31) 

yy: year (00-99) 



fYES I 

'no > 
createJ 



HC=.JNO \ 



YES: hard-copy file exists 
NO: no recording performed 
CREATE: create a hard-copy 
file 

This operand makes it possible to ADD 
phase names to the system directory 
list and, optionally, to load phases 
into the SVA 



{3800 I cuu} [.BURSTKYIN]] 

[,CHARS=[tablename]] 
[,FCB=[fcb name]] 
[,FLASH=[overlay name]] 
[,FORMS=[forms name]] 
[,LIST] 

[,MODIFY=[copymod name]] 
[.RESET] 



cuu[,MODE] 



The SETMOD command, valid for 
the 3401 magnetic tape unit 

cuu Specifies the channel and 
unit number of the 3401 

mode Can be one of the following: 
90 or HL — high speed and 
long gap (streaming) 
30 or HS - high speed and 
short gap (streaming) 
50 or LL — low speed and 
long gap (start-stop) 
60 or LS - low speed and 
Short gap (start-stop) 

If the mode operand is omitted, the 
default mode setting of 60 (or LS) 
is assumed. 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS ( Cont'd) 



Name Operation 



Operand 



Accepted 
by 



SYSxxx[,BURST={N|Y|*}] 

r,CHARS= ftable namel * Tl 
|_ \(table name, . . .)jj 

[,COPIES=number][,DCHK={B|U}] 

DEBUG=rNORMy 
TERM I 
DUMPr 
TRACJ 

[,dflt={niy}] 

',FCB= [fcb namel* 

{ (fcb name, V)^ 
[(*,V) 

',FLASH= (overlay namel* I (,count) 

< (overlay name[,{count|255}]) 
|j*[{count|255}]) 

f,FORMS=(forms namel *}][IN1T={N|Y}] 

r,MODIFY=rcopymod namel* T| 

I Y(^°Py"^°d name, table nameljj 

[,SEP=0][,TRC={N|Y}] 



partition=mK [,partition=mK] . . . 



m 



Same as BATCH 



option [,option] ... 



The STDOPT command can be 
used to reset in all partitions the 
permanent job control options 
which were established at system 
initialization. 

The command can only be given 
in the background partition. 
The options, which can appear in 
any order, are as follows (the first 
keyword is always the default 
value): 

ALIGN yes/no 

Specifies if the assembler 
is to align data on half- 
word or fullword bound- 
aries, according to the 
type of instruction used. 
A supervisor must be 
assembled with ALIGN= 
YES to avoid hard waits. 

ACANCEL No/yes 

Specifies if job control is 
to cancel jobs automatic- 
ally (ACANCEL=YES) or 
to wait for operator inter- 
vention (ACANCEL=N0) 
after an unsuccessful at- 
tempt to assign a device. 
(Note that the LOG com- 
mand suppresses the 
ACANCEL function). 

CHARSET 48CI 60C. 

Specif ies either the 48- 
or 60-character set for 
PL/I translator input on 
SYSIPT 



JCC 
JCS 



DATE 



MDYI DMY 

Specifies the format of 

the date: MDY=month/ 

date/year. 

DMY=day/month/year. 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS ( Cont'd) 



Operation 



Operand 



Accepted 
by 



STDOPT 
(Cont'd) 



DECK YESINO 

Specifies if language trans- 
lators are to produce 
object modules on SYSPCH 

DUMP YESINOIPART 

Specifies if a dump of the 
registers and virtual 
storage is to be written on 
SYSLSTincaseof an ab- 
normal program end. 
PART specifies that a 
dump of the supervisor 
control blocks and the 
virtual storage of the parti- 
tion is to be written on 
SYSLST 

EDECK NOIYES 

Spec ifies if the assembler 
is to create and punch 
edited macros on SYSPCH 



ERRS 



YESJNO 

Specifies if compilers are 

to summarize all errors in 

source programs on 

SYSLST. Assembler and 

PL/I always assume 

ERRS=YES. 

56|nn 

Specifies the number of 
lines per page on SYSLST. 
The minimum is 30, the 
maximum is 99. (If job 
control is running in 
another partition at the 
same time, the new value 
becomes effective in that 
partition when the next 
page is started.) 

YESjNO 

Specifies if language trans- 
lators are to write source 
module listings and diagno- 
stics on SYSLST. 

NOIYES 

Specifies if compilers are 

to write hexadecimal 

object module listings on 

SYSLST. 

YESjNO 

Specifies if all job control 
statements are to be listed 
on SYSLST. Invalid state- 
ments and commands will 
be listed on SYSLST if it 
is assigned. 

NOIYES 

Specifies if the relocation 
dictionary information is 
to be printed. 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (. . . . Cont'd) 



Operation 



Operand 



Accepted 
by 



STDOPT 
(Cont'd) 



SXREF NOIYES 

Specifies whether the 

assembler is to print short 
cross-reference lists on 
SYSLST. The printing of 
unreferenced labels is 
suppressed instead. 
SXREF=YES forces 
XREF=NO. 

SYM NOIYES 

SYM=YES specifies that 
the PL/I compiler is to pro- 
duce a symbol and offset 
table listing on SYSLST, 
or that American National 
Standard Cobol is to pro- 
duce a data division glos- 
sary. 

SYSDMP NOIYES 

YES indicates that dumps 
are to be written on 
SYSDMP and NO that 
they are to be written on 
SYSLST. 



TERM 



NOIYES 

Specifies whether messages 
from a compiler are to be 
displayed on SYSLOG. 

YESINO 

XREF=YES specifies that 
the assembler is to write 
symbolic cross-reference 
lists on SYSLST, or that 
American National Stan- 
dard COBOL is to produce 
a cross-reference listing. 
XREF=YES forces 
SXREF=NO. 



blank 



Stops batched-job progr. processing 



filename, ['file-ID'], 
[date], [file serial 
number], [volume se- 
quence number], 
[file sequence number], 
[generation number], 
[version number] 



Note: For ASCII file 
processing the fourth 
and fifth operands are 
called set identifier 
and file section number, 
respectively 



filename: One to seven alphameric 
characters, the first of 
which must be alphabetic 

'file-ID': One to seventeen alpha- 
meric characters 

date: One to six characters 
(yy/ddd or d-dddd) 

S[file serial number (EBCDIC): 
One to six alphameric characters] 
[set identifier (ASCII): Six alpha- 
meric characters] 
[volume sequence number | 
(EBCDIC)] U 

[file section number (ASCII)]] 
One to four numeric characters-! 

file sequence number: One to four 
numeric characters 

generation number: One to four 
numeric characters 

version number: One to two 
numeric characters 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS {. . . . Cont'd) 



Name 


Operation 


Operand 


Remarks 


Accepted 
by 




TPBAL 


[n] 


r1 = number of partitions in which 
processing can be delayed 
(0, 1,2,.., number of partitions 
minus one). 

Allows the operator to display or 
alter the status of the Teleproces- 
sing Balancing function. 


AR 




UCS 


SYSxxx, phasename 

[,FOLD][,BLOCK] 

[.NULMSG] 


Causes the 240-character universal 
character set contained in the core 
image library phase specified by 
phasename to be loaded as buffer 
storage in the IBM 2821 CU. 
SYSxxx must be assigned to a 1403 
Printer with the UCS feature. 


JCC 




UNBATCH 


blanl< 


Terminates foreground processing 


JCC 


// 


UPSI 


nnnnnnnn 


n 0, 1 or X 


JCS 


// 


VOLUME 


[ciculcuu] 


The VOLUME command provides 
the operator with a short summary 
of the volumes mounted on DASD 
devices, together with an indication 
of whether or not a volume is in 
use. 


AR 


// 


ZONE 


{im}'^^'- 


EAST A geographical position 
east of Greenwich 

WEST A geographical position 
west of Greenwich 

hh/mm A decimal value which 
indicates difference in 
hours and minutes 
between local time and 
Greenwich Mean Time, 
hh may be in the range 
0-12; mm in the range 
0-59. 


JCS 


/+ 


ignored 


[comments] 


Indicates end of procedure 


JCS 


/• 


ignored 


ignored 


Columns 1 and 2 are the only 
columns checked 


JCS 


/& 


ignored 


[comments] 


Columns 1 and 2 are the only 
columns checked. Comments 
appear on SYSLOG ahd SYSLST 
at EOJ. 




♦ 




comments 


Column 2 must be blank 





JOB CONTROL- AND ATTENTION ROUTINE COMMANDS ( Cont'd) 



Type of Command or Statement 


Operation 


Valid for 1 


JCS 


AR 


JCC 


Operator Communications 


ALTER 

DSPLY 

DUMP 

END or 

ENTER key 

IGNORE 

LOG 

MAP 

MSG 

MODE 

NEWVOL 

NOLOG 

REPLID 

SETMOD 

ZONE 




K 


X 
X 
X 

X 

X 

X 
X 
X 
X 

X 


X 
X 
X 


Control of I/O System 


ASSGN 

CLOSE 

DVCDN 

DVCUP 

HOLD 

LFCB 

LISTIO 

LUCB 

MTC 

RESET 

ROD 

SETDF 

SETPRT 

UCS 

VOLUME 


X 
X 

X 
X 

X 


X 

X 
X 


X 
X 

X 
X 

X 
X 
X 

X 


Execution of Program 


EXEC 
RSTRT 


X 
X 




X 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS ( Cont'd) 

JOB CONTROL STATEMENTS SUMMARY 

ASSGN Used at execution time to assign a specific device address to the symbolic unit 

name used. 
CLOSE Closes either a system or a programmer logical unit assigned to tape, disk, 

or diskette. 
DATE Contains a date that is put in the communications region. 

DLBL Contains file label information for DASD or diskette label checking and creation. 

EXEC Indicates the end of job control statements for a job step and that the job step 

is executed. 
EXTENT Defines each area, or extent, of a DASD file or diskette volume. 

ID Used to specify user identification and password. 

JOB Indicates the beginning of control information for a job. 

LBLTYP Defines the amount of storage to be reserved at link-edit time for processing tape 

and nonsequential DASD file labels in the partition. 
LISTIO Used to get a listing of I/O assignments on SYSLOG or SYSLST. 

MTC Controls operations on logical units to IBM 2400/3400 series magnetic tapes. 

OPTION Specifies one or more of the job control options. 

OVEND Indicates that no more overwrite statements will follow for the respective procedure. 

PAUSE Causes a pause immediately after processing this statement. 

RESET Resets I/O assignments to the standard assignments. 

RSTRT Restarts a checkpointed program. 

SETPRT Loads the IBM 3800 buffers. 

STDOPT Resets systems defaults. 

TLBL Contains file label information for tape label checking and writing. 

UPS! (User Program Switch Indicators.) Allows the user to set program switches that 

can be tested. 
ZONE Initializes the zone field in the communications region. 

/* Indicates the end of a data set or the end of a job step. 

/& Indicates the end of a job. 

* Job control comments. 

/+ Indicates the end of a procedure. 



Programming support continues for the following job control statements provided in previous 
versions of the system (they should, however, not be used for new applications): 

DLAB Contains file label information for DASD label checking and creation. 

TPLAB Contains file label information for tape label checking and writing. 

VOL Used when a set of label information for a magnetic tape file or a DASD file is 

specified. It is not required with the current DLBL, EXTENT, or TLBL statements. 
XTENT Defines each area, or extent, of a DASD file. It is used in conjunction with the 

VOL and DLAB statements. 



LINKAGE EDITOR CONTROL STATEMENTS 



name, origin[,NOAUTO] 
[,SVA][,PBDY] 



name; Symbolic name of the phase. 
One to eight alphameric 
characters 

origin: Specifies the load address of 
the phase. 

Load address can be in one of 
the following formats: 

1) symbol [(phase)] 
[±relocation] 

2) '[t relocation] "1 

3) S[+ relocation] J * 

• addresses relativ to begin of 
virtual partition 

4) ROOT 

5) -i-displacement't 

6) F +address / ** 

♦ * absolute addresses 

Note: A phase is eligible for relocation 
by the relocating loader if its origin is 
specified as a relative address (formats 
1-4 above). 

However, if a phase is relative to another 
phase whose origin is specified as an 
absolute address (formats 5 or 6 above), 
r?one of the phases can be made relo- 
catable during this linkage editor execu- 
tion. Refer to ACTION statement for 
additional information about the relocat- 
ing loader. 

NOAUTO Indicates that the automatic 
library lookup (AUTOLINK) 
feature is suppressed for both 
the private- and system relocat- 
able libs. 



SVA 



Indicates that the phase is 
SVA-eligible. 

Indicates that the phase is to 
be link-edited on a page 
bound ery. 



[modulename][, (name list)] 



If both operands are omitted the object 
module to be included is assumed to be 
on SYSIPT. 

If the first operand is present, the object 
module is assumed to be in either the 
private- or the system relocatable library.. 

If the first operand is omitted and the 
second operand is present, the object 
module to be included is assumed to be 
in the input stream (SYSLNK). 

modulename: Symbolic name of the 

module as used when cataloged 
in the relocatable library. 
It consists of one to eight alpha- 
meric characters. 

(namelist):The Linkage Editor constructs 
a phase from only the control 
sections specified. The name- 
list is in the following format: 
(cs name 1 , cs name 2, ..) 
Entries within the parentheses 
are the names of the control 
sections that are used to consti- 
tute the phase. 



LINKAGE EDITOR CONTROL STATEMENTS (. . . . Cont'd) 



Remarks 



entrypoint Symbolic name of an entry 
point. 

If the operand field is blank, 
the Linkage Editor uses as 
transfer address the first signi- 
ficant address provided in an 
END record encountered 
during generation of the first 
phase. 



I 



\norel/ 

r.MAP ] 
[.NOMAPj 
[ ,Cancel ] 



[,NOAUTO] 



Indicates Linkage Editor options: 

CLEAR Indicates that the unused 

portion of the core image lib- 
rary will be set to binary zero 
before the beginning of the 
Linkage Editor function. 

MAP Indicates that SYSLST is avail- 

able for diagnostic messages. 
In addition, a virtual storage 
map is printed on SYSLST. 

NOMAP Indicates that SYSLST is not 
available when performing the 
linkedit function. 

NOAUTO Indicates that the AUTO 

LINK function is to be suppres- 
sed. 

CANCEL Cancels the job automatically 
if any of the errors 21001 
through 21701 occur. 

BG Sets the end-of-supervisor ad- 

Fn dress used in Linkage Editor 

calculation to the beginning of 
the partition specified, plus 
the length of the label area and 
of the save area. 
If none of these operands are 
present, the program is link- 
edited to execute in the virtual 
partition in which linkedit 
takes place, unless otherwise 
specified in the PHASE state- 
ment. 

REL Indicates that the phase(s) pro- 

duced during this execution of 
the Linkage Editor is to be 
made relocatable if possible. 
Refer to origin operand in 
PHASE statement. 

Note: If support for the relocating loader 
was generated in the supervisor, ACTION 
REL is the default. 

NOREL Indicates that the phase(s) pro- 
duced during this execution of 
the Linkage Editor is not to 
be made relocatable. 

Note: If support for the relocating loader 
was not generated in the supervisor, 
ACTION NOREL is the default. 



LIBRARIAN 

Maintenance Functions 



Function 


Unit 


Element 


Control Statements 


Catalog 


Cor Image 
Library 


Phase 


// OPTION CATAL 

(Linkage Editor control statements and if in card 

form, the phase to be cataloged) 

/• . 

//EXECLNKEDT 


Relocatable 
Library 


Module 


//EXECMAINT 

CATALR modulename [,v,m] 
(module to be cataloged) 


Source statem. 
Library 


Book 


//EXECMAINT 

CATALS sublib.bookname [,v,ml,c]] 
(book to be cataloged) 


Procedure 
Library 


Proce- 
dure 


//EXECMAINT 

CATALP procedurename [,VM=v.mI 

[,EOP=yy] ,DATA=^ 

(procedure to be cataloged) 
/■(-(or delimiter as specified in EOP parameter) 


Delete 


Core Image 
Library 


Phase 
Program 


//EXECMAINT 

DELETC phase 1 [.phase 2,.. ] 

//EXECMAINT 

DELETC prog1.ALL[,prog2.ALL ] 


Relocatable 
Library 


Module 
Program 
Library 


//EXECMAINT 

DELETR module 1[,module2 ] 

//EXECMAINT . 

DELETR prog1.ALL[,prog2.ALL ] 

//EXECMAINT 
DELETR ALL 


Source 

Statement 

Library 


Book 

Sub 
Library 

LibrarV 


//EXECMAINT 

DELETS sublib.book1[,sublib.book2, . . ] 

//EXECMAINT 
DELETS sublib.ALL 

//EXECMAINT 
DELETS ALL 


Procedure 
Library 


Proce- 
dure 

Library 


//EXECMAINT 

DELETP procedurename[,procedure- 
name2, ] 

//EXECMAINT 
DELETP ALL 


Rename 


Core Image 
Library 


Phase 


//EXECMAINT 

RENAMEC oldname, newname[,oldname, 
newname, . . . .] 


Relocatable 
Library 


Module 


//EXECMAINT 

RENAMR oldname, newname [,oldname. 


Source 

Statement 

Library 


Book 


//EXECMAINT 

RENAMSsublib.oldname.sublib. newname 
[,subllb.oldname,sublib. newname, . . . . ] 


Procedure 
Library 


Proce- 
dure 


//EXECMAINT 

RENAMP oldname,newname[,oldname, 
newname, ] 


Update 


Source 

Statement 

Library 


Book 


//EXECMAINT 

UPDATE sublib.bookname,! s.bookl ], 

[v.m],[nn] 
) ADD, ) DEL, or ) REP statements as required 

with source statements to be added 
)END[v.m],C]] 



LIBRARIAN!. 


. . . Cont'd) 






Function 


Unit 


Element 


Control Statements 


Condense 


Core Image 


Library 


//EXECMAINT 




Library 




CONDSCL 


Relocatable 


L4brary 


// JOB jobname 




Library 




//EXECMAINT 
CONDSRl 


Source 


Library 


//EXECMAINT 




Statement 




CONDSSL 




Library 






Procedure 


Library 


//EXECMAINT 




Library 




CONDSPL 


Libraries 


«MI 


//EXECMAINT 








CONDSCL, RL,SL, PL 


Set 


Libraries 


Any or 


//EXECMAINT 


Parameter 




All 


CONDL lib=nnnnn[,lib=nnnnn[,lib=nnnnn]] 


for 






Notes: Values to be substituted for lib: 


Automatic 
Condense 






CL.— Core image library 

RL - Relocatable library 

SL - Source statement library 

PL - Procedure library 
Values to be substituted for nnnnn: 
for CKD devices one to five decimal digits with a 
maximum value of 65536 for FBA devices, one to 
nine digits. 


Reallocation 


System 


Library 


// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE 

FILE' date, code 
// EXTENT SYSRES, balance of extent 

information 
//EXECMAINT 

ALLOC CL=cylin(tracks),RL=cylin(tracks), 

SL=cylin(tracks),PL=cylin(tracks) 

Notes: 

CL - Core image library 

RL - Relocatable library 

SL - Source ststement library 

PL - Procedure library 
For FBA devices, CYLIN and TRACKS are to be 
substituted by blocks. 



I 



Note: // JOB, /* and /& must be included where needed 



Service Functions 



Display Unit 


Element 


Control Statements 


Core Image 
Library 


Phase 


//EXECCSERV 

DSPLYphase1[,phase2 ] 


Program 


//EXECCSERV 

DSPLY prog1.ALL[,prog2.ALL ] 


Library 


//EXECCSERV 
DSPLY ALL 


Directory 


//EXECDSERV 

DSPLY CD or DSPLYS CD 


Phase(s) 
with 
Version 
and 

Modifica- 
tion Level 


In the standard position: 
//EXECDSERV 

DSPLY[S] CD(phasename) or CD(phasename) 
In the nonstandard position or higher than DSERV in use: 


//EXECDSERV 

DSPLY[S] CD(phasename,nn) or CD(phasename,nn) 



LIBRARIAN { Cont'd) 



Display Unit 


Element 


Control Statements 


Relocatable 
Library 


Module 


//EXECRSERV 

DSPLYmodule1[,module2, ] 


Program 


//EXECRSERV 

DSPLY prog1.ALL[.prog2.ALL ] 


Library 


//EXECRSERV 
DSPLY ALL 


Directory 


//EXECDSERV 

DSPLY RD or DSPLYS RD 


Source 

Statement 

Library 


Book 


//EXECSSERV 

DSPLY sublib.book1[.sublib.book2 ] 


Sublibrary 


//EXECSSERV 

DSPLY sublib1.ALL[,sublib2.ALL ] 


Library 


//EXECSSERV 
DSPLY ALL 


Directory 


//EXECDSERV 

DSPLY SD or DSPLYS SD 


Macro- 
Sublibrary 


// EXEC ESERV 
GENEND 
DSPLY E.book 1 (,E.book2, . . . ) 


Procedure 
Library 


Procedure 


//EXECPSERV 

DSPLY procedurename1[,procedurename2, ] 


Library 


//EXECPSERV 
DSPLY ALL 


Directory 


//EXECDSERV 

DSPLY PD or DSPLYS PD 


Transient 
Directory 


Directory 


//EXECDSERV 

DSPLY TD or DSPLYS TD 


System 
Directory 


Directory 


//EXECDSERV 


Directories 


All 


//EXECDSERV 

DSPLY ALL or DSPLYS ALL 


Punch Unit 


Element 


Control Statements 


Core Image 
Library 


Phase 


//EXECCSERV 

PUNCH phase 1[,phase2,...] 


Program 


//EXECCSERV 
■ PUNCH prog1.ALL[,prog2.ALL ] 


Library 


//EXECCSERV 
PUNCH ALL 


Relocatable 


Module 


//EXECRSERV 

PUNCH module 1[,module2 ] 


Program 


//EXECRSERV 

PUNCH prog1.ALL[.prog2.ALL, I 


Library 


//EXECRSERV 
PUNCH ALL 


Source 

Statement 

Library 


Book 


//EXECSSERV 

PUNCH sljblib.book1[,sublib.book2, . . .][,CMPRSD] 


Sublibrary 


//EXECSSERV 

PUNCH sublib1.ALL[,sublib2.ALL ][,CMPRSD] 


Library 


//EXECSSERV 

PUNCH ALL[,CMPRSD] 


Macro 
Sublibrary 


//EXEC ESERV 
GENEND 
PUNCH E.bookl (.E.book 2,...) 


Procedure 
Library 


Procedure 


//EXECPSERV 

PUNCH procedurename1[,procedurename2, ] 


Library 


//EXECPSERV 
PUNCH ALL 



LIBRARIAN ( Cont'd) 



Display and 
Punch Unit 


Element 


Control Statements 


Core Image 
Library 


Phase 


//EXECCSERV 

DSPCH phase 1[,phase2 ] 


Program 


//EXECCSERV 

DSPCH prog1.ALL[,prog2.ALL ] 


Library 


//EXECCSERV 
DSPCH ALL 


Relocatable 
Library 


Module 


//EXECRSERV 

DSPCH module 1[,module2 ] 


Program 


//EXECRSERV 

DSPCH prog1.ALL[,prog2.ALL ] 


Library 


//EXECRSERV 
DSPCH ALL 


Source 

Statement 

Library 


Book 


//EXECSSERV 

DSPCH sublib.book1[,sublib.book2 ][,CMPRSDI,HEX| 

,CMPHEX] 


Sublibrary 


//EXECSSERV 

DSPCH sublib.1.ALL[,sublib2.ALL ][,CMPRSDI,HEX| 

.CMPHEX] 


Library 


//EXECSSERV 

DSPCH ALL[,CMPRSDI,HEX|,CMPHEX] 


Macro 
Sublibrary 


//EXECESERV 
GENEND 
DSPCH e.bookl (,E.book2, . . . ) 


Procedure 
LibrarV 


Procedure 


//EXECPSERV 

DSPCH procedurename 1 [,procedurename2 ] 


Library 


//EXECPSERV 
DSPCH ALL 



I 



Note: //JOB,/* and /& must be included where needed 



Copy Unit 


Element 


Control Statements 


Core Image 
Library 


Phase 


// ASSGN SYS002,cuu ^ 

II DLBL IJSYSRS.'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
//EXECCORGZ 

ALLOC CL=cylin(tracks),RL=cylin(tracks) 

SL=cylin(tracks),PL=cylin(tracks) 
. ALLOC STATEMENT MUST ALWAYS BE PRESENT 
.C0PYCphase1[,phase2 ] 


Program 


// ASSGN SYS002,cuu 

// DLBL IJSYSRS.'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002,balance of extent information 
//EXECCORGZ 

ALLOC CL=cylin(tracks), RL=cylin(tracks), 

SL=cylin(tracks),PL=cylin(tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPY progi .ALL[,prog2.ALL, . . . . ] 


Library 


// ASSGN SYS002,cuu 

// DLBL IJSYSRS,'DOS SYSTEM RESIDENCE FILE', 

date,code 
// EXTENT SYS002,balance of extent information 
//EXECCORGZ 

ALLOC CL=cylin(tracks),RL=cylin(tracks), 

SL=cylin(tracks),PL=cylin(tracks) 
. ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYCALL 



LIBRARIAN (....Cont'd) 



Copy Unit 


Element 


Control Statements 


Core Image 


Library 


//ASSGNSYS002,cuu 


Library 




// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 


(Cont'd) 




date, code 
// EXTENT SYS002, balance of extent information 
//EXECCORGZ 

ALLOC CL=cylin(tracks),RL=cylin(tracks), 

SL=cylin(tracks),PL=cylin(tracks) 
♦ ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPY NEW 


Relocatable 


Module 


//ASSGNSYS002,cuu 


Library 




// DLBL IJSYSRS,'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
//EXECCORGZ 

ALLOC CL=cylin(tracks),RL=cylin(tracks), 

SL=cylin(tracks),PL=cylin(tracks) ■ 
♦ ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYR module 1 [,module2, ] 


Program 


//ASSGNSYS002,cuu 






// DLBL KJSYSRS,'DOS SYSTEM RESIDENCE FILE', 






date, code 






// EXTENT SYS002, balance of extent information 






//EXECCORGZ 






ALLOC CL=cylin(tracks),RL=cylin(tracks), 






SL=cylin(tracks),PL=cylin(tracks) 






. ALLOC STATEMENT MUST ALWAYS BE PRESENT 






COPYR prog1.ALL[,prog2.ALL ] 


Library 


//ASSGNSYS002,cuu 






// DLBL IJSYSRS,'DOS SYSTEM RESIDENCE FILE', 






date, code 






// EXTENT SYS002, balance of extent information 






//EXECCORGZ 






ALLOC CL=cylin(tracks),RL=cylin(tracks), 






SL=cylin(tracks),PL=cylin(tracks) 






. ALLOC STATEMENT MUST ALWAYS BE PRESENT 






COPYR ALL 


Library 


// ASSGN SYS002,cuu 






// DLBL IJSYSRS,'DOS SYSTEM RESIDENCE FILE', 






date, code 






// EXTENT SYS002, balance of extent information 






//EXECCORGZ 






ALLOC CL=cylin(tracks),RL=cylin(tracks), 






SL=cylin(tracks),PL=cylin(tracks) 






* ALLOC STATEMENT MUST ALWAYS BE PRESENT 






COPYR NEW 


Source 


Book 


// ASSGN SYS002,cuu 


Statement 




// DLBL IJSYSRS,'DOS SYSTEM RESIDENCE FILE', 


Library 




date, code 
// EXTENT SYS002, balance of extent information 
//EXECCORGZ 

ALLOC CL=cylin{tracks),RL=cylin(tracks), 

SL=cylin(tracks),PL=cylin(tracks) 
. ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYS sublib.bookl [,sublib.book2 ] 


Sublibrary 


// ASSGN SYS002,cuu 






// DLBL IJSYSRS,'DOS SYSTEM RESIDENCE FILE', 






date, code 






// EXTENT SYS002, balance of extent information 






//EXECCORGZ 






ALLOC CL=cylin(tracks),RL=cylin(tracks), 






SL=cylin(tracks),PL=cylin(tracks) 






♦ ALLOC STATEMENT MUST ALWAYS BE PRESENT 






COPYS sublib1.ALL[,sublib2.ALL ] 


Library 


// ASSGN SYS002,cuu 






// DLBL IJSYSRS, DOS SYSTEM RESIDENCE FILE , 






date, code 






// EXTENT SYS002, balance of extent information 



LIBRARIAN (. . . . Cont'd) 



Copy Unit 


Element 


Control Statements 


Source 

Statement 

Library 


Library 
(Cont'd) 


//EXECCORGZ 

ALLOC CL=cylin(tracks),RL=cylin(tracks), 

SL=CYlin(tracks),PL=cylin(tracks) 
. ALLOC STATEMENT MUST At WAYS BE PRESENT 

COPYSALL 


Library 


//ASSGNSYS002,cuu 

//DLBLIJSYSRS,'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
//EXECCORGZ 

ALLOC CL=cylin(tracks),RL=cylin(tracks), 

SL=cylin(tracks),PL=cylin(tracks) 
. ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYS NEW 


Procedure 
Library 


Procedure 


// ASSGN SYS002,cuu 

// DLBL IJSYSRS,'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
//EXECCORGZ 

ALLOC CL=cylin(tracks),RL=cylin(tracks), 

SL=cylin(tracks),PL=cylin(tracks) 
. ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYP procedurenamel [,procedurename2, . . . .] 


Library 


// ASSGN SYS002,cuu 

// DLBL IJSYSRS,'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
//EXECCORGZ 

ALLOC CL=cylin(tracks),RL=cylin(tracks) 

SL=cylin(tracks),PL=cylin(tracks) 
♦ ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYP ALL 


Library 


// ASSGN SYS002,cuu 

// DLBL 1JSYSRS,'D0S SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
//EXECCORGZ 

ALLOC CL=cylin(tracks),R L=cylin(tracks), 

SL=cylin(tracks),PL=cylin(tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYP NEW 


Libraries 


All 


// ASSGN SYS002,cuu 

// DLBL IJSYSRS.'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
//EXECCORGZ 

ALLOC CL=cylin(tracks),RL=cylin(tracks), 

SL=cylin(tracks),PL=cylin(tracks) 
» ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPY ALL 


Definition 
of a 
Private 
Library 
(See note 2) 


Core Image 


■// ASSGN SYS003,cuu 

// DLBL IJSYSPC'user identification of private library', 

date, code 
// EXTENT SYS003, balance of extent information 
//EXECCORGZ 

NEWVOL CL=cylin(tracks) 


Relocatable 


// ASSGN SYSRLB,cuu 

// DLBL IJSYSRL.'user identification of private library', 

date, code 
// EXTENT SYSRLB, balance of extent information 
//EXECCORGZ 

NEWVOL RL-cylin(tracks) 


Source 
Statement 


// ASSGN SYSSLB,cuu 

// DLBL IJSYSSL,'user identification of private library', 

date, code 
// EXTENT SYSSLB, balance of extent information 
//EXECCORGZ 

NEWVOL SL=cylin(tracks) 



I 



LIBRARIAN (. . . . Cont'd) 



Copy Unit 


Element 


Control Statement 


Definition . 
and 

Creation of 
a Private 
Library 
(See note 2) 


Core Image 


// ASSGN SYS003,cuu 

// DLBL IJSYSPC'user identification of private library', 

date, code 
// EXTENT SYS003, balance of extent information 
//EXECCORGZ 

NEWVOLCL=cylin(tracks) 

COPYC operands 


Relocatable 


//ASSGN SYS RLB.cuu 

// DLBL IJSYSRL,'user identification of private library', 

date, code 
// EXTENT SYSRLB,balance of extent information 
//EXECCORGZ 

NEWVOLRL=cylin(tracks) 

COPYR operands 


Source 
Statement 


// ASSGN SYSSLB,cuu 

// DLBL IJSYSSL,'user identification of private library', 

date, code 
// EXTENT SYSSLB, balance of extent information 
//EXECCORGZ 

NEWVOLSL=cylin(tracks) 

COPYS operands 


Merge System 
Residence to 
New System 
Residence 




// ASSGN (statements as required) 

// DLBL IJSYSRS,'NEW SYSTEM RESIDENCE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

MERGE RES.NPS 

COPY statements (COPYC,COPYR,COPYS,COPYP,COP^I) 

as required 


Merge New 
System 
Residence 
to System 
Residence 




// ASSGN (statements as required) 

// DLBL IJSYSRS,'NEW SYSTEM RESIDENCE', 

date, code 
// EXTENT SYS002, balance of extent information 
//EXECCORGZ 

MERGE NRS, RES 

COPY statements (COPYI,COPYC,COPYR,COPYS,COPYP, 

COPY) as required 


Merge System 
Residence 
to Private 
Libraries 




// ASSGN (statements as required) 

// DLBL IJSYSRL,'PRIVATE RELOCATABLE LIBRARY', 

date, code 
// EXTENT SYSRLB, balance of extent information 
// DLBL US YSSL,' PRIVATE SOURCE STATEMENT 

LIBRARY', date, code 
// EXTENT SYSSLB, balance of extent information 
// DLBL IJSYSCL,'PRIVATE CORE IMAGE LIBRARY', 

date, code 
// EXTENT SYSCLB, balance of extent information 
ASSGN SYSCLB,cuu 
//EXECCORGZ 

MERGE RES, PRV 

COPY statements (COPYI,COPYR,COPYS,COPYC) 

as required 


Merge New 
System 
Residence 
to Private 
Libraries 




// ASSGN (statements as required) 

// DLBL IJSYSRS,'NEW SYSTEM RESIDENCE', date, code 

// EXTENT SYS002, balance of extent information 

// DLBL IJSYSRL,'PRIVATE RELOCATABLE LIBRARY', 

date, code 
// EXTENT SYSRLB, balance of extent information 
// DLBL IJSYSSL,' PRIVATE SOURCE STATEMENT 

LIBRARY', date, code 
// EXTENT SYSSLB, balance of extent information 
// DLBL IJSYSCL,' PRIVATE CORE IMAGE LIBRARY', 

date, code 
// EXTENT SYSCLB, balance of extent information 
ASSGN SYSCLB.cuu 
//EXECCORGZ 

MERGE NRS,PRV 

COPY statements (COPYR,COPYS,COPYC) as required 



LIBRARIAN!. ...Cont'd) 



Copy Unit 


Element 


Control Statements 


Merge 
Private 
Libraries 
to System 
Residence 




//ASSGN (statements as required) 

// DLBL IJSYSPR/PRIVATE RELOCATABLE LIBRARY', 

date, code 
// EXTENT SYS001, balance of extent information 
// DLBL IJSYSPS,'PRIVATE SOURCE STATEMENT 

LIBRARY', date, code 
// EXTENT SYSOOO, balance of extent information 
// DLBL IJSYSPC,'PRIVATE CORE IMAGE LIBRARY', 

date, code 
// EXTENT SYS003, balance of extent information 
//EXECCORGZ 

MERGE PRV,RES 

COPY statements (COPYR,COPYS,COPYC) as required 


Merge 

Private 

Libraries 

to New 

System 

Residence 




// ASSGN (statements as required) 

// DLBL IJSYSRS,'NEW SYSTEM RESIDENCE', 

date, code 
// EXTENT SYS002, balance of extent information 
// DLBL IJSYSPR,'PRIVATE RELOCATABLE LIBRARY', 

date, code 
// EXTENT SYS001 , balance of extent information 
// DLBL IJSYSPS,' PRIVATE SOURCE STATEMENT 

LIBRARY', date, code 
// EXTENT SYSOOO, balance of extent information 
// DLBL USVSPC'PRIVATE CORE IMAGE LIBRARY', 

date, code 
// EXTENT SYS003, balance of extent information 
//EXECCORGZ 

MERGE PRV,NRS 

COPY statements (COPYR,COPYS,COPYC) as required 


Merge 
Private 
Libraries 
to Private 
Libraries 




// ASSGN (statements as required) 

// DLBL IJSYSRL,'NEW PRIVATE RELOCATABLE 

LIBRARY', date, code 
// EXTENT SYSRLB, balance of extent information 
// DLBL IJSYSPR, 'EXISTING PRIVATE RELOCATABLE 

LIBRARY', date, code 
// EXTENT SYS001, balance of extent information 
// DLBL IJSYSSL,'NEW PRIVATE SOURCE STATEMENT 

LIBRARY', date, code 
// EXTENT SYSSLB, balance of extent information 
// DLBL !JSYSPS,'EXISTING PRIVATE SOURCE 

STATEMENT LIBRARY', date, code 
// EXTENT SYSOOO, balance of extent information 
// DLBL IJSYSCU'NEW PRIVATE CORE IMAGE LIBRARY', 

date, code 
// EXTENT SYSCLB, balance of extent information 
ASSGN SYSCLB,cuu 
// DLBL IJSYSPC'EXISTING PRIVATE CORE IMAGE 

LIBRARY', date, code 
// EXTENT SYS003, balance of extent information 
//EXECCORGZ 

MERGE PRV,PRV 

COPY statements (COPYR,COPYS,COPYC) as required 

To define the private library in the same jobstep, precede 
MERGE with NEWVOL statement (except for COPYC 
statements). 



I 



Notes: 1) //JOB, /* and /& must be included where needed 

2) The private library can be updated with either a MAINT or CORGZ MERGE function 



Direction of Transfer for Merge Operations 



Logical Unit 




IJSYSRS 


IJSYSRL 


IJSYSPR 


IJSYSSL 


IJSYSPS 


IJSYSCL 


IJSYSPC 


File Name 


SYSRES 


SYS002 


SYSRLB 


SYS001 


SYSSLB 


SYSOOO 


SYSCLB 


SYS003 


IVIergeREStoNRS 


from 


to 














Merge NRS to RES 


to 


from 














Merge RES to PRV 


from 




to 




to 




to 




Merge NRS to PRV 




from 


to 




to 




to 




Merge PRV to RES 


to 






from 




from 




from 


Merge PRV to NRS 




to , 




from 




from 




from 


Merge PRV to PRV 






to 


from 


to 


from 


to 


from 



Function: De-editing and/or updating of edited macro's. 

(Refer to: Guide to DOS/VS Assembler (GC33-4024)) 



Control Statement 


Meaning 


//EXECESERV 




GENEND 


Causes generation of an assembler END 
statement, and a /* statement. GENEND, when 
present, must be the first statement after the 
//EXECESERV statement. 


GENCATALS 


Causes generation of the appropriate 
CATALS statement before each macro in the 
stream, and a /* statement after the last macro. 
GENCATALS, when present, must be the first 
statement after the // EXEC ESERV statement. 
Note: if neither GENEND nor GENCATALS is 
used, GENCATALS is assumed. 


DSPLY sublibl.mac1(,sublibl.mac2 ] 


Produces a printout of the de-edited macro on 
the device assigned to SYSLST. 


PUNCH sublibl.mac1[,sublibl.mac2 ] 


Produces a de-edited deck on the device assigned 
to SYSPCH. 


DSPCH sublibl.macl[,sublibl.mac2, ] 


Produces a deck and printout of the de-edited 
macro on the devices assigned to SYSPCH and 
SYSLST respectively. 


) COL start col,n 


Specifies the columns containing the sequence 
numbers in the statement of a macro definition. 

startcol A decimal number within the range 
73-80, which identifies the start 
column of the sequence number. 

n A decimal number within the range 

1-8, specifying the number of columns 
used by the sequence number. 

COL, when present must be the first statement 
following DSPLY, PUNCH or DSPCH statement. 
If the COL statement is omitted startcol receives 
a default value of 73 and n a default value of 6. 


) VER seqno[+rel],l 


Specifies the source statement of a macro defini- 
tion which contents are to be verified. 

seqno-Hrel Identifies the source statement which 
is to be compared with the statement 
following the VER statement, 
seqno: The sequence number of a 
source statement. 

rel: A decimal number of 1-4 digits in 
length. If omitted, is assumed. 

1 A decimal number within the range 
1-80. If omitted, 72 is assumed. 
Only the first 1 characters are used in 
the comparison. 


) ADD seqno[+rel] 


Add statements to a source macro definition. 

seqno-^rel Identifies the source statement after 
which the new statements following 
the ADD statement are to be inserted, 
(seqno: See VER statement) 
(rel: See VER statement) 


) DELseqno[+rel](,seqno[+rel]] 


Delete statements from a macro source defini- 
tion. 

seqno-^rel,seqno-^fel Identifies the first and the 
last source statement of the section" 
to be deleted. If the second operand 
is omitted, only the source state- 
ment identified by the first operand 
is deleted. 

(seqno: See VER statement) 
(rel: See VER statement) 



I 



ESERV ( Cont'd) 



Control Statement 


Meaning 


) REPseqno[+rel][,seqno[+rel]] 


Replace statements in a source macro definition. 

seqno+rel,seqno+rel Identifies the first and the 
last source statement of the section 
which is to be replaced by the state- 
ments following the REP statement. 
If the second operand is omitt , 
omitted, only the source statement 
identified by the first operand is 
replaced. 

(seqno: See VER statement) 
(rel: See VER statement) 


) RST seqno[+rel] 


Specifies a new sequence number serial starts. 

seqno+rel Identifies the source statement 
after which the new serial starts, 
(seqno: See VER statement) 
(rel: See VER statement) 


)END 


Indicates the end of an update to a macro defini- 
tion. Required statement for all updating. 



Sample coding for de-editing without updating a macro def initi 

//JOBNOUPDATE 
//EXEC ESERV 
PUNCH E.MAC1,E.MAC2 

/* 
/& 

Sample coding for de-editing and updating a macro definition 

//JOB UPDATE 
//EXEC ESERV 

GENEND 

DSPCH E.MAC1 
) COL 77,3 
) VER 72 -I- 1,5 
.PP9 
) ADD 72 + 1 

AIF (&PCH NE 1400) D4 
) DEL 102, 103 
) REP 245 

JOYCE CLC 0(4,REG6),BLANKS 
)END 
/* 

// PAUSE CHECK LIST, MOVE DECK TO READER 
// OPTION EDECK, NODECK 
//EXEC ASSEMBLY 

deck produced by ESERV 

// PAUSE MOVE SYSPCH DECK TO READER 
//EXECMAINT 

deck produced by assembler 



/* 
/& 



LSERV 

The label inforrration cylinder is on the first full cylinder afte^^the last system library on SYSRES. 
A display of all labels on the cylinder, with the exception of Data Set Secured labels, can be ob- 
tained by executing LSERV. Illustrations in this section show the location of the label informa- 
tion cylinder on SYSRES, and the layout of label information and record format. 

System requirements 

LSERV may be executed in any partition, with a minimum of 8192 bytes of the real or virtual 
address areas. LSERV assumes that the SYSRES label cylinder is formatted as described in 
DOS/VSE DASD Labels. 

Executing LSERV 

The control statements necessary to execute LSERV in a virtual partition are: 

From the console: 

//EXEC LSERV 
From the reader: 

// JOBjobname 

//EXEC LSERV 

/• 

/& 
LSERV can also be executed in a real partition. The output of LSERV shows the contents of the 
label cylinder on the device assigned to SYSRES. The output is directed to the device assigned to 
SYSLST. 

When and How to use 

1. Operator action given in DOS/VSE Messages indicates when LSERV must be executed. 
Programmer action, also given in DOS/VSE Messages, explains how to use the LSERV printout. 
For example, under the message: 

OP36NO REC FND 

2. It is useful to execute LSERV prior to running a program that is known to have been run some- 
time in the past, but whose workfile assignments and partition allocations are unknown. 

3. LSERV can be used for error analysis. LSERV displays the TLBL and the DLBL and EXTENT 
information contained on the SYSRES label cylinder. Information about secured data files is 
not displayed. 

Summary of information provided 

The printout of LSERV will show you the following details about the previous run: 

• Whether the correct DLBL/EXTENT information is still on the label cylinder 

• The permanent files 

• The temporary files 

• Extent type 

• File type 

For more information. 

Refer to DOS/VSE Serviceability Aids and Debugging Procedures (GC33-5380). 



SUPERVISOR MACROS 

Supervisor Macro Instruction 



Explanation 



im 



M 



-{^ 



MODE=pZ0} 



N PARTS =/-^| 



PACE,N.(^} 



M 



(models 115 and 125 
only) 



TP = BTAM/VTAM 



Indicates whether the supervisor is to support 
American National Standard Code for Information 
Interchange (ASCII). YES adds 512 Bytes to the 
supervisor size. 



YES must be specified if mixed parity tape process- 
ing is required for the emulators, the tape prepro- 
cessor and the tape postprocessor programs. 



Specifies whether the Supervisor Select option is to 
be used. By specifying an alphameric character 
(A-Z, 1-9), a unique name will be assigned to the 
supervisor being generated. For example,. ID=A 
generates a supervisor named $$A$SUPA. It this 
parameter is omitted the supervisor will be named 
$$A$SUP1. 



Indicates support for magnetic ink or optical 
character reader/sorters., The specification 14 indi- 
cates support for 1 41 9s with Single Address Adapter; 
1255s, 1259s, or 1270s. 1419D specification gives 
support for 1419s with Dual Address adapter, or 
1275s. Burst mode and MICR devices cannot run 
concurrently on the same byt multiplexor channel. 



Specifies whether 370 or 4300 hardware is 
supported. 



Specifies the number of partitions to be supported. 
The minimum is 2. The maximum value for N is 5. 
The default value is 3. 



Specifies that paging activity is to be controlled by 
means of the macros PAGEIN, RELPAG, and 
FCEPGOUT. The value n indicates the maximum 
no. of page-in requests that can be queued for 
execution. Each PAGEIN macro issued in a progran 
represents a page-in request. To obtain the support 
for the 3 macros, the value n must be 1 or higher. 
Although the maximum number is not restricted, 
n should not exceed 15. 



Specifies whether the entire RMS (MCAR, CCH, 
and RMSR) is to be generated. RMS=YES is 
required if the string switch feature is installed. 
If RMS=NO is specified and TP=VTAM, then 
RMS=YES is forced. 



Specification of VTAM forces AB=YES, FCPREAL 
=YES, IT=YES, OC=YES, PC=YES, PFIX=YES, 
AP=YES, TOD=YES, WAITM=YES, and for 
Models 115 and 125 RMS=YES. 



Describe the Hardware Features 



Operation 


Operand 


Explanation 


CONFG 


-=M 


Floating Point Feature 


MODEL = modnumber 


Specify the model number of the processor. 



SUPERVISOR MACROS (. . . . Cont'd) 

Specify Optional Support in the Supervisor 



Explanation 



--r) 



im 



NO 
D0C=<125D; 
3277 



4) 



-m 



-={ffe} 



NO 
YES 
JA= |(n1,n2,n3 ) 



/ NC\ 
= \n1,n2/ 



Specifies whether output to a console printer 
assigned as SYSLOG is to be buffered, n specifies 
the number of buffers to be generated. Accepted 
values are from 1 to 50. An invalid specification 
causes one buffer to be generated. 



Specifies support for protection of DASD files, 
where n',n^ indicates the whole range of channels 
to which the devices may be attached. Specification 
or n',n^ provides file protection for disk devices. 



Only valid in 370 mode. 

Specifies whether support is required for Display 
Operator Console (DCC). The necessary supervisor 
routines are generated to allow to assign SYSLOG 
either to a 125D or 1 3277. The default taken is 
dependent on the CPU model number as specified 
by the MODEL parameter of the CONFG macro. 
If M0DEL=1 15, or 125, 125D will be used as a 
default. If !V10DEL=138, 148, 158, 301 1, or 4300, 
3277 will be the default. For any other MODEL 
the default will be NO. 

Note: A Display Operator Console must not be 
attached to the same selector or multiplexor 
channel asSYSRES. 



Specify the number of entries for the error queue. 
With multiprogramming support n may be from 
5 to 50. Lhe lower value is the default value in 
each case. 



Specifies support for error by volume analysis for 
2400 and 3400 series tapes, r is the read error 
threshold, w is the write error threshold. 



Specifies whether fast CCW translation is to be 
supported. Specifying FASTTR=YES affects the 
maximum, minimum and default values of 
BUFSIZE=nin VSTAB. 



Generates Job Accounting Interface support. YES 
specifies basic support (SIOs not counted). 
(nl,n2,n3, . . . ) specifies the number of devic es 
per partition for which SIOs are to be counted. 
The maximum value of n for any partition is 255; 
the default value is Q. n1 always specifies the 
number for the background partition. The parti- 
tions to which n2,n3 . . . refer depend on the 
number of partitions in the system. The table 
below shows the pattern for partition association 
to values n2 through n5. 

n2 n3 n4 n5 

2 partitions F1 

3 partitions F2 Fl 

4 partitions F3 F2 Fl 

5 partitions . F4 F3 F2 Fl 



Generates a user save area and an alternative label 
area for job accounting. n1 specifies the number 
of bytes for the save area for user-written job- 
accounting routines. The maximum acceptable 
value is 1024 and the default value is 16. n2 spe- 
cifies the number of bytes for the alternative 
label area. The maximum value is 244 and the 
default value is 0. 



PRTY=(partion, partition. 



Specifies the dispatching priorities of partitions in 
ascending order. The number of operands must be 
equal to the number of partitions in the system. 
The default sequence is BG, Fn, . . ., that is, 
BG has the lowest priority and Fl has the highest 
priority. 



SUPERVISOR MACROS ( Cont'd) 



Specify Optional Support in the Supervisor (. . . . Cont'd) 



Operation 



Operand 



Explanation 



FOPT 
(cont'd) 



-^} 



Specifies the numopr of entries in the Private 
Second Level Directories. A PSLD is created for 
each partition. The minimum value that may be 
specified for n is 5. The upper limit is not re- 
stricted but the value specified should not exceed 
18 for CKD devices and 30 for FBA devices. 
5 is assumed in case of an incorrect specification. 
A performance decrease will result if the number 
specified is less than the number of actually used 
directory tracks of a Private Core Image Library. 



-m 



Provides support for the Rotational Position Sens- 
ing (RPS) capabilities of DASD devices supporting 
the feature. 



-M 



Specifies the number of entries in the Second Level 
directory.'The minimum value for n is 5. This value 
is assumed in the case of an incorrect specification. 
A performance decrease will result if the.number spe- 
cified is less than the number of actually used direc- 
tory tracks of the System Core Image Library. An 
upper limit for CKD is 18, for FBA it is 30, although 
the number is not restricted. 



-m 



Specifies whether the synchronous exit function is 
to be supported. SYNCH=YES should be specified 
if problem programs use the synchronous exit 
facility (SVC screening) to support multiple users 
in one partition. 



NO] 
YES 
(YES,n1,n2) 



Specifies if system input and system output files 
(SYSRDR, SYSIPT, SYSLST,'SYSPCH) in any 
partition may be assigned to a disk device or dis- 
kette, or if extended support for the procedure 
library is desired. Specification of YES gives sup- 
port for all disk devices including diskette. n1 indi- 
cates the residual capacity (in records) for begin- 
ning of operator notification when SYSLST is 
assigned to a disk device. n2 indicates the same for 
SYSPCH. Acceptable values for n1 and n2 are from 
100 to 65535; if either is omitted, 1000 is assumed. 
For diskette this notification is not supported. 



-m 



Specif ies whether individual (IR) or combined (CR) 
recording of error statistics is required for unlabeled 
or nonstandard 2400 or 3400 series tapes. 



-(v) 



Specifies whether the Track-Hold feature is to be 
supported for DASD in a supervisor that supports 
multiprogramming, n indicates the maximum no. 
of tracks/blocks to be held at any one time. 
Accepted values are from 1 to 255. A Track-Hold 
Table (THTAB) with n entries is generated in the 
supervisor. An invalid specification results in 10 
entries being generated. The NPARTS parameter in 
the SUPVR macro must specify more than one 
partition if TRKHLD= n is sf>ecified. 



r No^ 

= l^partition ID J 



Specifies whether the timer is to be supported and 
if so, the partition owning the task timer. Only one 
partition ID can be specified. The partition ID is 
BG or Fn (where n is one of the foreground parti- 
tions generated into the system). If the partition 
ID sequence does not correspond to the appropriate 
NPARTS specification, or if the value specified for 
NPARTS is invalid, an MNOTE is issued. 



SUPERVISOR MACROS ( Cont'd) 



Specify Optional Support in the Supervisor (. . . . Cont'd) 



Operation 


Operand 


Explanation 


FOPT 
(Cont'd) 


USERID=id 

■ 


Specifies whether a supervisor id is to be printed as 
part of the IPL COMPLETE message, id may be up 
to 16 bytes long. If you specify more than 16 bytes, 
the id will be truncated on the right. If you specify 
less than 16 bytes, the id will be padded with blanks 
on the right. The specified id is placed in a 16 byte 
area that immediately precedes the BG communi- 
cation region. The field contains blanks if the para- 
meter is not specified. 


XECB=^YES^ 
I" J 


Specifies whether Cross Partition Event Control is 
to be supported. If YES is specified, four XECB's 
are generated per partition (as specified in NPARTS) 
n must be specified as a numeric value and indi- 
cates the number of XECB's for which an entry is 
to be generated in a supervisor internal table. 


Tno ^ 

ZONE=^EAST \ 
[WEST 'hh.mmj 


Indicates the difference between Greenwich Mean 
Time and local time for obtaining the local time of 
day. NC is assumed if the parameter is omitted 
cr is invalid, or if TOD=NO is specified. 



Define options and Configuration requirements to be included in Physical IOCS 



Operation 


Operand 


Explanation 


PIOCS 

Describes 

the System 

I/O 

Configu- 

tion 






CHANSW=|^| 


Specifies whether channel switching is to be sup- 
ported for tape or disk control units on selector 
cr block multiplexor channels. If CHANSW=YES 
and TAPE=NOis specified, TAPE=YES is forced. 


DISK=(device-list) 


Specifies the type of disk devices to be supported. 
Specification of DISK=xxxx gives support to all 
attachable DASD devices of the type specified. 
If support for more than one type of DASD device 
is required, each type must be specified. 
For example, to provide support to 3330s and 
3340s, specify DISK=(3330, 3340). For Model 115, 
3340 is forced. For Model 125, 3330 is forced if nei- 
ther 3330 nor 3340 is specified. If MODEL specifies 
4300-hardware and MODE=370, 3340 is default. 


VSTAB 
Describes 
Real and 
Virtual 
Storage 
and the 
Channel 
Program 
Trans- 
lation 
Copy 
Blocks 






VSIZE=nK 


Only valid in 370 mode. 

Specifies the size of virtual storage including SVA. 
n must be at least 128K times the number of parti- 
tions specified by the NPARTS parameter and a 
multiple of 2, plus the size of the SVA. The mini- 
mum size for the SVA, for system purposes, is 
100K (including the system GETVIS area of 20K). 
This size and the amount of the SVA space to be 
used for user modules have to be added to the size 
for the partitions. 


BUFSIZE=n 


Specifies the number of copy blocks to be generat- 
ed for the Channel Program Translation routine. 
The default and minimum values are shown in the 
DOS/VSE SYSGEN manual. 



SUPERVISOR MACROS ( . 



Define options and Configuration requirements to be included in Physical IOCS (. . . . Cont'd) 



Operation 


Operand 


Explanation 


lOTAB 


BGPGR=(^} 


Specifies the number of programmer logical units 
(SYSnnn) for the BG partition. The minimum 
value for n islO, and the maximum is 241. A' parti- 
tion LUB table is generated with a two-byte entry 
for each system logical unit and additional entries 
for the number of units specified by n. 


BSCLNS=(-1} 


Specifies the maximum number of BSC lines for 
Model 1 15 or 125 with Integrated Communications 






Adapter (ICA). The minimum specification is 






and the maximum is 6. The specified value is 






entered in the second byte of the Line Mode Table 






(MODTAB) and the table is generated with this 






number of entries for BSC line mode settings. If the 






parameter is omitted, n defaults to 1 . 


f— 1 


Specifies the number of 8-byte entries to be gene- 




CHANQ=< -|- \ 


rated for the channel queue. At least six entries are 




6 


always generated, but if more than three partitions 




^ nJ 


are specified by the NPARTS parameter of the 
SUPVR macro, then this minimum is increased by 
two for each additional partition and is further in- 
creased by the number of console buffers specified 
by the CBF parameter in the FOPT macro. 


-n={^) 


Specifies the number of each type of special device 
attached to the system. The number specified for 




fol 


each device may be more than the actual number 




02314=' 2 > 


attached, but if the total number of special devices 




L"J 


specified exceeds the number of devices specified in 






the lODEV parameter the latter number is set to 




D2400=(^} 


the total number of special devices plus 5. 




r°i 


Dxxxx can have two functions: 




D3330=-J2> 


1. For each special device specified, a PUB table ex- 




r ^ 


tension (PUB2) entry is generated of appropriate 




fo 1 


length for that device. 




D3340=< £ > 


2. For device on a block multiplexer channel run- 




l_n 


ning in block multiplex mode additional CCWs 




fol 


are generated, for DASDFP. 




D3350=.j 2^ ^ 


For defaults and values to be specified refer to 




03410=^ 2 y 


DOS/VSE System Generation Manual. 








O3420=(2} 






D3540=(^} 






D3800={^} 






D3886=(^) 






D3895=n 






D8809=n 






DFBA=n 


Only valid in ECPS:VSE mode. 

Specifies the number of FBA devices attached to 

the system. 



SUPERVISOR MACROS (. . . Cont'd) 



Define options and Configuration requirements to be included in Physical IOCS (. . . Cont'd) 



Operation 


Operand 


Explanation 




FnPGR=(;^) 


Specifies for foreground partition n the number of 
programmer logical units. The minimum value for 
m is 10, and the maximum value is 241. 


,OOEV=(12) 


Specifies the number of I/O devices attached to the 
system. The maximum specification allowed is 254, 
the minimum is 4. Each unit requiring an ADD 
entry must be included in n. 


j,g^|5xnpartsj 


Specifies the number of Job Information Blocks 
(JIBs) for the system (the minimum is 5, the maxi- 
mum is 255). Requirements are: 

1. One JIB for each temporary logical unit assign- 
ment. 

2. One JIB for each alternate logical unit assign- 
ment. 


NRES={|} 


Indicates the number of Resource Usage Records 
(RURs). The default value d is equal to the no. of 
partitions supported plus 10. The minimum value 
accepted is the no. of partitions increased by 2. 


SSLNS=(f} 


Specifies the maximum number of Start/Stop lines 
for the Model 1 15 or 125 with the Integrated 
Communications Adapter (ICA). The minimum 
specification is and the maximum is 16. The 
specified value is entered in the first byte of the 
Line Mode Table (MODTAB) and the table is 
generated with this number of entries for Start/ 
Stop line mode settings. It the parameter is omitted 
and M0DEL=1 15 or 125, then n defaults to 4. 



I 



DEVICE TYPE CODES 



Card 
Code 


Actual IBM Device 


Device- 
Type 
X'nn' 


Device Type 


2400T9 
2400T7 
3410T9 
3410T7 
3420T9 
3420T7 
8809 


9-track Magnetic Tape units 
7-track Magnetic Tape units 
9-track 3410 Magnetic Tape units 
7-track 341 Magnetic Tape units 
9-track 3420 Magnetic Tape units 
7-track 3420 Magnetic Tape units 
8809 Magnetic Tape unit 


50 
50 
53 
53 
52 
52 
5A 


Magnetic Tape devices 


1442N1 

252081 

2560 

2596 

3525RP 

5425 


1442N1 Card Read Punch 

2520B1 Card Read Punch 

2560 Multifunction Card machine 

2596 Card Read Punch 

3525 Card Punch (witch optional read 

feature) 

5424/5425 Multifunction Card Unit 


30 
31 
33 
30 
32 

34 


Card Read Punches 


2501 
2540 R 
3504 
3505 


2501 Card Reader 
2540 Card Reader 

3504 Card Reader 

3505 Card Reader 


10 
11 
12 
12 


Card Readers 


2540P 

2520B2 

1442N2 

2520B3 

3525P 


2540 Card Punch 
2520B2 Card Punch 
1442N2 Card Punch 
2520B3 Card Punch 
3525 Card Punch 


21 
20 
22 
20 
23 


Card Punches 


PRT1 

1403 

1403U 

1443 

2245 

3203 
3211 
3277 
(local 3270) 

3277B 
(local 3270) 

3800 
3800B 

3800BC 

3800C 

5203 
5203U 


321 1 , 3203-4, 3203-5 and 3289-4 Printer 

1403 Printer 

1403 Printer with UCS feature 

1443 Printer 

2245 KANJI Printer (Supported in Real 

Mode only) 

3203 Printer 

SAMEASPRT1 

3284, 3286, 3287, 3288 Printers with 

3277 Control Unit or 3284, 3286, 3287, 

3288, and 3289 Printers with 3274 

Control Unit. MODE operand must be 

entered as X-OV. 

3284, 3286, 3287, 3288 Printers with 

3277 Control Unit or 3284, 3286, 3287, 

3288, and 3289 Printers with 3274 

Control Unit, attached in burstmode to 

a multiplexor Chan. (MODE operand must 

be entered as X'OV). 

3800 Printing Subsystem 

3800 Printing Subsystem with Burster 

Trimmer-Stacker (BTS) 

3800 Printing Subsystem (BTS and 

Additional CGS 

3800 Printing Subsystem with Additional 

Character Generation Storage (CGS) 

5203 Printer 

5203 Printer with UCS feature 


43 
40 
42 
41 
44 

4A 
43 
BO 

BO 

45 
45 

45 

45 

4C 
4D 


Printers 


1050A 


3210, 3215 Console 

Printer Keyboards 

3286-2 in Printer Keyboard Mode 


00 
00 


Printer Keyboards 


125D 
125DP 

3277 
3277 


Model 115 or Model 125 Integrated 

Display Operation Console 

Model 138/148 Console in 115/125 

Console Display Emulation Mode 

Model 115 or Model 125 Integrated 

Display Operator Console 

Model 138/148 Console in 115/125 

Console with 5213 Console Printer 

attached 

3277 Display Operator Console 

3284, 3286 or 3287 Console Printer 

(the MODE operand must be entered 

as X'02') 


82 
B2 

BO 
BO 


Display Operator Console 



DEVICE TYPE CODES ( . . . . Cont'd) 







Device- 




Card 




Type 




Code 


Actual IBM Device 


Xnn 


Device Type 


UNSP 


Unsupported Device 


FF 


Unsupported Device 


UNSPB 


Unsupported Device 


FF 




FBA 


3310/3370 Direct Access Storage Device 


90 


DASD 


2311 


2311 Disk Storage Device 


60 




23^4 


2314 Direct Access Storage Facility 


62 




2314 


2319 Disk Storage Facility 


62 




3330 


3330 Disk Storage, Model. 1 and 2, or 
3333-1 


63 




3330 B 


3330 Disk Storage Modell 11 


65 




3340 


3340 Disk Storage (General) 


68 




3340 R 


3340 Disk Storage with RPS Feature 

(with or without 3340 Data Module 
Model 35) 


68 




3340 R 


3340 Disk Storage with RPS Feature 

(with or without 3340 Data Module 
Model 70) 


68 




3340 


3344 Direct Access Storage 


68 




3340 R 


3344 Direct Access Storage with RPS 


68 




3340 


3340 Disk Storage without RPS Feature 
(with or without 3340 Data Module 
Model 35) 


69 




3340 


3340 Disk Storage without RPS Feature 
(with or without 3340 Data Module 
Model 70) 


6A 




3350 


3350 Disk Drive 


67 




1419 


1255 Magnetic Character Reader 


72 


MICR-Magnetic Ink 


1419 


1259 Magnetic Character Reader 


72 


Character Recognition 


1419 


1419 Magnetic Character Reader 


72 


Devices 


1419P 


1419 Dual Address Adapter Primary 
Control Unit 


73 




1419S 


1419 Dual Address Adapter Secondary 
Control Unit 


74 




3895 


3895 Document Reader/lnscriber 


7D 


Reader/lnscriber 


2701 


2701/2715 Data Adapter unit 


DO 


Teleprocessing lines 


2701 


Integrated Communications Adapter 
(Model 135) 


D2 




2702 


2702 Transmission Control unit 


D1 




2703 


2703 Transmission Control unit 


D2 




2703 


Integrated Communication Adapter 
(Model 115/125) 


D2 




2703 


3704/3705 Communication Controller 
in Emulation Mode 


D2 




3704 


3704 Communication Controller 


DC 




3705 


3705 Communication Controller 


DC 




3791 L 


3791 Local Communication Controller 


DE 




3274-1 A 








3705 


SDLC ICA on 4300 Processors 
(Mode must be entered ASIO) 






LCA2 


3791 Cluster Controller, Locally Attached 


DE 




1419 


1270 Optical Reader/Sorter 


72 


Optical Readers 


1419P 


1275 Optical Reader Sorter 
Primary Control Unit 


73 




1419S 


1275 Optical Reader Sorter 
Secondary Control Unit 


74 




1287 


1287 Optical Reader 


77 




1288 


1288 Optical Page Reader 


77 




3881 


3881 Optical Mark Reader 


11 




3886 


3886 Optical Character Reader 


7C 




3540 


3540 Diskette Input/Output Unit 


80 


Diskette 


7443 


7443 System Recording File 


88 




2260 


2260 Display Station 


CO 


Display Stations 


3277 


3277 Display Station; MODE operand need 


BO 




(local 3270) 


not be entered 






3277 B 


3277 Display Station; attached in burst 


BO 




(local 3270) 


mode to a multiplexor channel. 
■ MODE operand need not be entered 







I 



DEVICE TYPE CODES ( . 



Card 
Code 


Actual IBM Device 


Device- 
Type 
Xnn 


Device Type 


7770 
7772 


7770 Audio Response Unit 
7772 Audio Response Unit 


D3 
D4 


Audio Response Units 


1017 

1017TP 

2671 


1017 Paper Tape Reader 

With 2826 Control Unit IVI.1 

1017 Paper Tape Reader with 2826 

Control Unit IVIodel 2 

2671 Paper Tape Reader 


78 
D5 
70 


Paper Tape Readers 


1018 
1018TP 


1018 Paper Tape Punch with 2826 
Control Unit M.I 

1018 Paper Tape Punch with 2826 
Control Unit Model 2 


79 
D6 


Paper Tape Punch 



FORMAT OF THE ESD CARD 



Card 
Columns 



2-4 

11-12 

15-16 



Multiple punch (12-2-9). 

Identifies this as a loader card. 

ESD - External Symbol Dictionary card. 

Number of bytes of information contained in this card. 

External symbol identification number (ESID) of the first SD, PC, CM or ER on 

this card. Relates the SD, PC, CM or ER to a particular control section. 

Variable information. 

8 positions - Name 

1 position - Type code hex 00 , 01 , 02 , 04 , 05 , or OA to indicate SD, LD, ER, 

PC, CM, or WX respectively. 

3 positions - Assembled origin 

1 position - Blank 

3 positions - Lenghth, if an SD type, CM type, or a PC type. 

If an LD type, this field contains the external symbol identification number (ESID) 

of the SD containing the label. 

May be used by the programmer for identification. 



FORMAT OF THE TXT CARD 



Card 
Columns 



11-12 
^5-16 



17-72 
73-80 



Multiple punch (12-2-9). 

Identifies this as a loader card. 

TXT -Text card. 

Assembled origin (Address of first byte to be loaded from this card). 

Number of bytes of text to be loaded. 

External symbol identification number (ESID) of the control section (SD or PC) 

containing the text. 

Up to 56 bytes of text — data or instructions to be loaded. 

May be used for program identification. 



FORMAT OF THE RLD CARD 

Card 
Columns 

1 Multiple punch (12-2-9). 

Identifies this as a loader card. 
2-4 RLD — Relocation List Dictionary Card. 

11-12 Number of bytes of information contained in this card. 

17-72 Variable information (multiple items). 

a) Two positions - (relocation identifier) pointer to the ESID number of the BSD 
item on which the relocation factor of the contents of the address constant 

is dependent. 

b) Two positions - (position identifier) pointer to the ESID number of the ESD 
item on which the position of the address constant is dependent. 

c) One position - flag indicating type of constant, as follows: 

Bits 

0-2 Ignored 

3 - a non branch type load constant 

I - a branch type load constant 

4-5 00 - load constant length = 1 byte 
01 - load constant length = 2 bytes 
10 - load constant length = 3 bytes 

I I - load constant length = 4 bytes 

6 - relocation factor is to be added 

1 - relocation factor is to be subtracted 

7 - Next load constant has different R and P identifiers; 

therefore, both R and P must be present. 
1 - Next foad constant has the same R and P identifiers; 
therefore they are both omitted. 

Five significant bits of this byte are expanded in the RSERV printout. 

d) Three positions — assembled origin of load constant. 
73-80 May be used for program identification. 

FORMAT OF THE END CARD 

Card 
Columns 

1 Multiple punch (12-2-9). 

Identifies this as a loader card. 
2-4 END 

6-8 Assembled origin of the label supplied to the Assembler in the END card 

(optional). 
15-16 ESID number of the control section to which this END card refers 

(only if 6-8 present). 
17-22 Symbolic label supplied to the Assembler if this label was not defined within 

the assembly. 
29-32 Control section length (if not specified in the last SD or PC). 

73-80 Not used. 

FORMAT OF THE REP (User Replace) CARD 

Card 
Columns 

1 Multiple punch (12-2-9). 

Identifies this as a loader card. 
2-4 REP- Replace text card. 

5-6 Blank. 

7-12 Assembled address of the first byte to be replaced (hexadecimal). 

Must be right justified with leading zero's if needed to fill the field. 
13 Blank 

14-16 External symbol identification number (ESID) of the control section (SD) 

containing the text (hexadecimal). Must be right justified with leading zero's if 

needed to fill the field. 
17-70 From 1-1 1 4-digit hexadecimal fields separated by comma's, each replacing two 

bytes. A blank indicates the end of information in this card. 
71-72 Blank 

73-80 May be used for program identification. 



I 



CHAPTER III 

DOS/VSE IOCS (GENERAL/SAM/DAM/ISAM) 



STANDARD VOLUME LABEL, TAPE ORDASD 



IBM Standard Volume Label Format (80 bytes) for EBCDIC Tape or DASD 



No, 




Volume label number 






















1 


2 


Volume Data 
Serial File 
Number Directory 


5 




Reserved 


6 


Reserved 


7 


8 

Owner name 
& Address code 




Reserved for future expansion 


9 


^ 


s 


:S^ 


j; 


?^ 




?: 


?i 


^ 


^ In 


?i 




§ 


Label 
Identifier 


Volume 
Security 























FJELD NAME AND LENGTH 

1 LABEL IDENTIFIER 

=! 3 bytes 

- 2 VOLUME LABEL NR 

1 byte 

3 VOLUME SERIAL NR 

6 bytes 



VOLUME SECURITY 
1 byte 
(OS/VS only) 



DESCRIPTION 

Must contain VOL to indicate that this is 5 

a Volume Label. 

Indicates the relative position (1-8) of a 
volume label within a group of volume 
labels. 

A unique identification code which is as- 
signed to a volume when it enters an in- ^ 
stal lotion. This code may also appear on 
the external surface of the volume for p 
visual identification.lt is normally a nu- 
meric field 000001 to 999999, however 
any or all of the 6 bytes may be alphameric. 

Indicates security status of the volume: _ 

0: no further identification for each file of 

the volume is required. 

1: Further identification for each file of Note: 

the volume is required before processing. 



FIELD NAME AND LENGTH 

5 DATA FILE DIRECTORY 

10 bytes 



RESERVED 

10 bytes 

RESERVED 

10 bytes 

OWNER NAME AND 

ADDRESS CODE 

10 bytes 



DESCRIPTION 

For DASD only. The first 5 bytes contain ■ 
the starting address(CCHHR)of the VTOC, 
The lost 5 bytes are blank. For tape files 
this field is not used and should be recor- 
ded as blanks. 

Reserved 

Reserved 

Indicates a specific customer, installation 
and/or system to which the volume be- 
longs. This field may be a standardized 
code, name ,address etc. (OS/VS only). 

Reserved 



RESERVED 
29 bytes 

All reserved fields should contain blanks to facilitate their use in 
the future. Any information appearing in these fields at the present 
time will be ignored by the DOS/VS and OS/VS programs. 



STANDARD VOLUME LABEL , TAPE OR DASD (....Cont'd) 
•ield I — Volume Label number 



ANSI Standard Volume Lobe! format and contents for ASCII tapes 



Volume 

Serial 

Number 



6 
Reserved 



Owner name «nd 
Identification code 



nPi 



m 



Label 
identifiei 



Accessibilit y 



Label Standard Level I 



FIELD NAME AND LENGTH 

1 LABEL IDENTIFIER 

I 3 bytes 

) 2 VOLUME LABEL NR 

1 byte 



VOLUME SERIAL NR 
6 bytes 



ACCESSIBILITY 
1 byte 



RESERVED 
20 bytes 



Must contain VOL to indicate that this 
a Volume Label. 

Must be 1 . If any other standard volume 
labels are present (indicated by an en- 
try other than 1 in this field)they are 
ignored. 

Uniquely identifies this volume. Must 
consist of 6 bytes and may be any 
character exept a quote('). 

Indicates accessibility protection: 
Space: No accessibility protection. 
Nonspace: Accessibility protection. 

Reserved for future use as required by 
the American National Standards Insti- 
stute, Inc. Should contain spaces. 



NAME AND LENGTH 

RESERVED 
6 bytes 

OWNER NAME AND 
IDENTIFICATION 
CODE 
14 bytes 

RESERVED 
28 bytes 

LABEL STANDARD 

LEVEL 

1 byte 



DESCRIPTION 

Reserved for future use as required by 
American National Standards Institute, 
Inc. Should contain spaces. 

Indicates a specific customer, installation 
and /or system to which the volume be- 
longs. This field may be a standardized 
code, name, address etc. 

Reserved for future use as required by 
the American Notional Standards Insti- 
tute, Inc. Should contain spaces. 

Indicates whether this volume observes 
the American Notional Standards: 
Dec. 1: Volurhe observes the standards 
(1 is also the default value) 
Space: Volume does not observe the 
standards, but it follows an agreed format. 



STANDARD MAGNETIC TAPE FILE LABEL 



IBM Standard Tape File Label Format and Contents 



Field 














Fil 


e Security - 












1 


2 


3 
File Identifier 


4 
File 
Serial 
Number 


5 


6 


7 


8 


9 

Creation 
Date 


10 

Expiration 
Date 


11 


12 

Block 
Count 


13 
System Code 


14 
Reserved 


— CO 


^>n j;: 


cs rv 


S ^ 


1^ ^ 


^ .^ 


§ 


^ !^ 


^ K 


? 


iS S 


:s ?l 


-* o 



^Label Number Volume Sequence Mr — 
Label Identifier File Sequence Number - 



' — Version Number of Generation 
-Generation Number 



FIELD NAME AND LENGTH 

; 1 LABEL IDENTIFIER 

; 3 bytes EBCDIC 



FILE LABEL NUMBER 
1 byte EBCDIC 

FILE IDENTIFIER 
17 bytes EBCDIC 

FILE SERIAL NUMBER 
6 bytes EBCDIC 



DESCRIPTION 

Identifies the type of label: 
HDR: Header — beginning of data file. 
EOF: End of File — end of a set of data. 
EOV: End of Volume — end of the phy- 
sical reel. 

Always a 1 

Uniquely identifies the entire file, may 
contain only printable characters. 

Uniquely identifies a file-volume relation- 
ship. This field is identical to the Volume 
Serial Number in the volume label on the 
first or only volume of a multi-volume file 
or a multi-file set. This field will normally 
be numeric(000001 to 999999) but may 
contain any six alphameric characters. 



FIELD NAME AND LENGTH 

5 VOLUME SEQUENCE 

NUMBER 
4 bytes 



FILE SEQUENCE 

NUMBER 

4 bytes 

GENERATION NUMBER 
4 bytes 

VERSION NUMBER OF 

GENERATION 

2 bytes 



DESCRIPTION 

Indicates the order of a volume in a given 
file or multi-file set. This number must be 
numeric(0000-9999). Multiple volumes of 
an output file will be numbered in conse- 
cutive sequence. 

Assign numeric sequence to a file within 
a multi file set. 



Numerically identifies the various editions 
of the file. 



Indicates the version of the generation of 
a file. 



STANDARD MAGNETIC TAPE FILE LABEL (. ...Cont'd) 



IBM Standard Tape File Label Format and Contents 



FIELD 


NAME AND LENGTH 




DESCRIPTION 


FIELD 


NAME AND LENGTH 


DESCRIPTION 


9 


CREATION DATE 
6 bytes 


Indicates the year and the day of the year 
that the f i le was created: 


13 


SYSTEM CODE 
13 bytes 


Uniquely identifies the programming 
system. 






Position 

1 

2-3 

4-6 


Code Meaning 

blank none 
00-99 year 
001-366 day of year 


14 


RESERVED 
7 bytes 


Reserved 






(e.g.,Jc 
65031) 


inuary 31 J965 would be entered as 








10 


EXPIRATION DATE 
6 bytes 


Indicates the year and the day of the year 
when the file may become a scratch tape. 









FILE SECURITY 
1 byte 



BLOCK COUNT 
6 bytes 



The format of this field is identical to 
field 9. On a multi-file reel, processed se- 
quentially, all files are considered to expire 
on the same day. 

Indicates the security status of the file. 
0: No security protection. 
1: Security protection. Additional identifi- 
cation of the file is required before it can 
be processed. 

Indicates the number of data blocks written 
on the file from the last header label to the 
first trailer label, exclusive of tape marks. 
Count does not include checkpoint records. 
This field is used in trailer labels. 



STANDARD MAGNETIC TAPE FILE LABEL 



ANSI Standard Tape File Label Format and Contents 



Field 






























— Accessibi 


ity 








1 


2 




File Identifier 


3 


4 

Set 
Identifier 


5 
File 
Section 
Numbei 


6 


7 


8 


9 

Creation 
Date 


10 

Expiration 
Date 


11 


12 

Block 
Count 




System Code 


13 


14 

Reserved for 
ANSI 


— 00 


^ 


lO 




Jn 


CN K 
CN CN 


S ^ 


^ 


-B. 


^ ^ 


o 


CN K 
Tt ,^ 


^ ^ 


s 


!o 5 


^_. 




f::?;^ s 



L 


1— File Label Number 
— Label Identifier 


FIELD 


NAME AND LENGTH 


_ 1 


LABEL IDENTIFIER 
3 bytes, ASCII 


2 


FILE LABEL NUMBER 
1 byte, ASCII 


3 


FILE IDENTIFIER 
17 bytes,ASCII 


4 


SET IDENTIFIER 
6 bytes, ASCII 



File Sequence Number — ' 



DESCRIPTION 

Identifies the type of label: 
HDR: Header — beginning of a data file. 
EOF: End of File — end of a set of data. 
EOV: End of Volume — end of the phy- 
sical reel. 

Indicates the sequence of this label within 
a label group(HDR,EOF,EOV).DOS/VS 
supports File Label 1 only and ignores sub- 
sequent numbers. 

Identifies the entire file. May be any cha- 
racter exept a quote('). 

Identifies the volume-file relationship. 
Generally, this field is identical to the 
volume serial number from the VOL label 
or the first or only volume of the logical 
file. 



—Version Number of Generation 
-Generation Number 



FIELD 
5 



NAME AND LENGTH 

FILE SECTION NUMBER 
4 bytes 



FILE SEQUENCE 

NUMBER 

4 bytes 

GENERATION NUMBER 

4 bytes 

VERSION NUMBER OF 

GENERATION 

2 bytes 

CREATION DATE 
6 bytes 



DESCRIPTION 

Indicates the order of a volume in a given 
file or multi-file set. (The first file must be 
numbered 0001). 

Assigns numeric sequence to a file within 
a multi-file set .(The first file must be num- 
bered 0001). 

Numerically identifies this edition of the 
file. (Must be numerical or blank). 

Indicates this version of the generation in 
field 7, (Must be numerical or blank). 



Indicates the year and the day of the year 
that this file was created (byyddd), where: 
b= blank yy= year (00-99) 
ddd= day (001-366) 



STANDARD MAGNETIC TAPE FILE LABEL (. . . .Cont'd) 



ANSI Sfandord Tape File Label Format and Contents 



FIELD NAME AND LENGTH 

10 EXPIRATION DATE 

6 bytes 



ACCESSIBILITY 
1 byte 



12 BLOCK COUNT 

6 bytes 

13 SYSTEM CODE 
— 13 bytes 

5; 14 RESERVED 

7 bytes 



DESCRIPTION 

Indicates the year and the day of the year 
that this file may become a scratch tape. 
Same format as above (Field 9). 

Indicates the accessibility protection of 
the file. 

Space: no accessibility protection . 
Nonspace: accessibility protection. 

Indicates the number of data blocks (phy- 
sical records) written for this logical file. 

Uniquely identifies the programming 
system. 

Reserved for future use as required by 
ANSI. (American National Standards Insti- 
tute, Inc.). Should be recorded as spaces. 



FIELD NAME AND LENGTH 



DESCRIPTION 



STANDARD DASD FILE LABEL , FORMAT 
-Field 



(Format 1: This format is common to all data files on Direct Access Storage Devices) 
Creation date ■ 1 r-Expirotion dote 



Spare 

Bytes used in last 
block of directory 
Extent count 




—Extent sequence number 
—Extent type indicator 



FIELD NAME AND LENGTH 

1 FILE NAME 

44 bytes, alphameric 
EBCDIC 



DESCRIPTION 

This field serves as the key portion of the 
file label. Each file must have a unique 
file name. Duplication of file names will 
cause retrieval errors. The file name can 
consist of three sections: 

1 File ID is an alphameric name assig- 
ned by the user and identifies the file. 
Can be 1-35 bytes if generation and 
version numbers are used, or 1-44 bytes 



FIELD NAME AND LENGTH 



if they are not used. 

2 Generation number . If used, this field 
is separated from File ID by a period. 

It has the format Gnnnn,v/here G iden- 
tifies the field as the generation number 
and nnnn (in decimal) identifies the ge- 
neration of the file. 

3 Version Number of Generation. 

If used, this section immediately follov/s the 



STANDARD DASD FILE LABEL , FORMAT 1 (....Cont'd) 



FIELD NAME AND LENGTH 



DESCRIPTION 



Ther 
2 



FILENAME generation number and has the format 

(Cont'd) Vnn, where V identifies the field as the 

version of generation number and nnn 
(in decimal)identifies the version of 
generation of the file. 
Note: DOS/VS compares the entire 
field against the filename given in the 
DLBL card. The generation and version 
numbers are treated differently by OS/VS. 

laining fields comprise the DATA portion of the file label: 

FORMAT IDENTIFIER 1= Format 1 

1 byte, EBCDIC numeric 



FILE SERIAL NR 
6 bytes, EBCDIC 
alphameric 

VOLUME SEQUENCE 
NR ,2 bytes, binary 

CREATION DATE 
3 bytes, discontinuous 
binary 

EXPIRATION DATE 
3 bytes, discontinous 
binary 



Uniquely identifies a file/volume rela- 
tionship. It is identical to the Volume 
Serial Number of the first or only vo- 
lume of a multivolume file. 

Indicates the order of a volume relative 
to the first volume on which the data 
file resides. 

Indicates the year and the day of the 
year the file was created. It is of the form 
YDD, where Y signifies the year(0-99) 
and DD the day of the year(l-366). 

Indicates the year and the day of the 
year the file may be deleted. The form 
of this field is the same as that of field 5. 



FIELD NAME AND LENG TH 
EXTENT COUNT 



BYTES USED IN LAST 
BLOCK OF DIRECTORY 
1 byte, binary 

SPARE 
1 byte 

SYSTEM CODE 
13 bytes 



9 RESERVED 
7 bytes 

10 FILE TYPE 
2 bytes 



DESCRIPTION 

Contains a count of the number of extents 
for this file on this volume. If user labels are 
•jsed,the count does not include the user 
label track. This field is maintained by the 
DOS/VS programs . 

Used by OS/VS 



Uniquely identifies the programming system. 
The character codes that can be used in this 
field are limited to EBCDIC characters. On 
Input, IOCS ignores this field. On output, 
IOCS writes the information supplied in DLBL. 

Reserved 

The contents of this field uniquely identify 

the type of data file: 

Hex 4000: Consecutive organization 

Hex 2000: Direct access organization 

Hex 8000: Indexed sequential organization 

Hex 0200: Library organization 

Hex 0000: Organization not defined in >he 

file label 
Hex 0008: VSAM 



STANDARD DASD FILE LABEL , FORMAT 1 (....Cont'd) 



FIELD 
11 



NAME AND LENGTH 

RECORD FORMAT 
1 byte 

OPTION CODES 



FIELD NAME AND LENGTH 



13 BLOCK LENGTH 
2 bytes, binary 

14 RECORD LENGTH 
2 bytes, binary 

15 KEY LENGTH 

1 byte, binary 

16 KEY LOCATION 

2 bytes, binary 

17 DATA SET 
INDICATORS 
1 byte 



Used by OS/VS 

Bits within this field indicate various options 

used in building the RIe: 

BitO: 

Bit 1: Reserved 

Bit 2: Master index present (ISAM) 

Bit 3: Independent overflow present (ISAM) 

Bit 4: Cylinder overflow present (ISAM) 

Bit 5: Reserved 

Bit 6: Delete record (OS/VS) 

Bit 7: Reorganize (OS/VS) 

Indicates the block length for fixed length 
records or maximum block size for variable 
length blocks. 

Indicates the record length for fixed length 
records or the maximum record length for 
variable length records. 

Indicates the length of the key portion of 
of the data records in the file. 

Indicates the high order position of the data 
records 

Bits within this field are used to indicate the 

following: 

Bit 0: If on, indicates that this is the last 



DESCRIPTION 

volume on which this file normally resides. 
Bit 1,2,4,6,7: for DOS/VS-Used by 

OS/VS. 
Bit 3: If on, data set security is invoked. 
Bit 5. Used by DOS/VS and OS/VS. 



SECONDARY 


Used by OS/VS 


ALLOCATION 




4 bytes, binary 




LAST RECORD POINTER 


Used by OS/VS 


5 bytes, discontinuous 




binary 




SPARE 


Reserved 


2 bytes 




EXTENT TYPE 


Indicates the typ 


INDICATOR 


following fields 


1 byte 


HEX CODE 



<tent with which the 
ocioted: 

00; Next three fields do not indicate any 

extent. 

Of: Data area (SAM, DAM), Prime data 

area (ISAM), Data Space (VSAM). 

02: Overflow area of an indexed sequen- 
tial file. 

04: Cylinder index or master index area of 
an indexed sequential file. 
40. User label track area. 
80; Shared cylinder indicator. 



STANDARD DASD FILE LABEL , FORMAT 1 (....Cont'd) 



FIELD NAME AND LENGTH 



DESCRIPTION 



EXTENT SEQUENCE NR Indicates the extent sequence in c 



1 byte, binary 

23 LOWER LIMIT 

4 bytes, discontinuous 
binary 

25-28 ADDITIONAL EXTENT 
10 bytes 

29-32 ADDITIONAL EXTENT 
10 bytes 

;j 33 POINTER TO NEXT 

FILE LABEL WITHIN 
THIS LABEL SET 

5 bytes, discontinuous 
binary 



ulti-extent file. 

The cylinder and the track address 
specifying the starting point(lower 
limit) of this extent component. This 
field has the format CCHH. 

These fields have the same format as 
the fields 21-24 above. 

These fields have the same format as 
the fields 21-24 above. 

The address (format CCHHR) of a con- 
tinuation label if needed to further describe 
the file. If field 10 indicates Indexed 
Sequential organization, this field points 
to a Format 2 file label within this label 
set. Otherwise, it points to a Format 3 file 
label, and then only if the file contains 
more than three extent segments. This field 
contains all binary zeros if no additional 
file label is pointed to. 



FIELD NAME AND LENGTH 

24 UPPER LIMIT 

4 bytes 



DESCRIPTION 

The cylinder and the track address 
specifying the ending point (upper 
limit) of this extent component. 
This field has the format cchh. 



STANDARD DASD FILE LABEL , FORMAT 2 



High Level Index Development Indicator — 
Index levels— I 
Format Indicator 



Last 2d Level Master Index Entry Address 



K2 
Address of 
2d Level 
Master Index 



Last 3d Level Master Index Entry Address 



K4 
Address of 
3d Level 
Master Index 



Spare 



pLast Data Track in Cylinder 

r-Number Tracks for Cylinder Overflow 
I — Highest "R" on high Level Index Track 
I — Highest "R" on Prime Track 

— Highest "R" on Overflow Track 

"R" of last Data Record on shared Track 



D5 



Dll 



D12 



D13 



DMD 



D16 
Prime 
Record 
Count 



Status 
Indicator 



High Record on Track Index Track - 

Tag Deletion Count - 

Non first Overflow Reference Count -f 



Number Tracks for Highest Level Index 
-Number bytes for Highest Level Index 



Bytes remaining on Overflow Track- 



Die 


D19 


D20 


D21 




D22 




D23 


D24 


D25 


C26 C27|C28|:29 


D30 


D31 


Address of 


Address of 


Address of 


Last Prime 












-ast Indepen- 














Cylinder 


Lowest Level 


Highest level 


Data Record 












dent Overflow 












Pointer 


Index 


Master Index 


Master Index 


Address 


























f:^ ^g Sfe SS: 22 


2 


fe 




j:^ ;2 


K ^ 


^ 


S 


R 


s 


2 ^2 f 



Number of independent Overflow Tracks 
Overflow Record Count 

Cylinder Overflow 

Area Count 



Last Track Index Entry Address- 
Last Cylinder Index Entry Address - 



-Last Master Index Entry Address 



SEE NEXT PAGE FOR FURTHER EXPLANATION 



STANDARD DASD FILE LABEL , FORAMT 2 (. . . .Cont'd) 



FIELD NAME AND LENGTH 

Kl KEY IDENTIFICATION 

1 byfe 

K2 ADDRESS OF 2d LEVEL 

MASTER INDEX 
7 bytes, discontinuous 
binary 

K3 LAST 2d LEVEL MASTER 

INDEX ENTRY 
5 bytes, discontinuous 
binary 

i K4 ADDRESS OF 3d LEVEL 

; AAASTER INDEX 

7 bytes, discontinuous 

binary 

K5 LAST 3d LEVEL MASTER 

INDEX ENTRY 
5 bytes, discontinuous 
binary 

K6 SPARE 

19 bytes 
Dl FORMAT IDENTIFIER 

1 byte, EBCDIC numeric 

D2 NUMBER OF INDEX 

LEVELS 
1 byte, binary 



DESCRIPTION 



FIELD NAME AND LENGTH 



This byte contains the hex code 02 in D3 

order to avoid conflict with a file name. 

This field contains the address of the 

first track of the second level of the 

master index, in the form MBBCCHH. D4 

(OS/VSonly) 

This field contains the address of the 

last index entry in the second level D5 

of the master index, of the form CCHHR. 

(OS/VSonly) 

This field contains the address of the first D6 

track of the third level of the master index, 
in the form MBBCCHH. 



This field contains the address of the last 
entry in the third level of the master 
index, in the form CCHHR. (OS/VS only) 

Reserved 



The contents of this field indicate how 
many levels of index are present with an 
Indexed Sequential File. 



HIGH LEVEL INDEX 

DEVELOPMENT 

INDICATOR 

1 byte, binary 

FIRST DATA RECORD 
IN CYLINDER 
3 bytes 

LAST DATA TRACK IN 
CYLINDERS 

2 bytes 

NUMBER OF TRACKS 
FOR CYLINDER 
OVERFLOW 
1 byte, binary 

HIGHEST "R" ON HIGH 
LEVEL INDEX TRACK 
1 byte 

HIGHEST "R" ON 
PRIME TRACK 
1 byte 

HIGHEST "R" ON 
OVERFLOW TRACK 
1 byte 



DESCRIPTION 

This field contains the number of tracks 
determining development of Master Index. 
(OS/VS only) 

This field contains the address of the last 
data track on each cylinder in the form HHR. 



This field contains the address of the last 
data track on each cylinder, in the form HH. 

This field contains the number of tracks in 
cylinder overflow area,(C6/VS only) 



This field contains the highest possible R 
on track containing high-level index 
entries. 

This field contains the highest possible R 
on prime data tracks for form F records. 

This field contains the highest possible R 
on overflow data tracks for form F records. 



STANDARD DASD FILE lABEL , FORMAT 2 (....Cont'd) 
FIELD NAME AND LENGTH DESCRIPTK 



FIELD NAME AND LENGTH 



DESCRIPTION 



DIO "R" OF LAST DATA 

RECORD ON SHARED 
TRACK -1 byte 

Dll HIGH RECORD ON 

TRACK INDEX TRACK 
2 bytes 

D12 TAG DELETION 

COUNT 

2 bytes, binary 

D13 NONE IRST OVERFLOW 

REFERENCE COUNT 

3 bytes, binary 

; DM NUMBER OF BYTES 

FOR HIGHEST LEVEL 
INDEX-2 bytes binary 

D15 NUMBER OF TRACKS 

FOR HIGHEST LEVEL 
INDEX 
1 byte, binary 

D16 PRIME RECORD COUNT 

4 bytes, binary 

D17 STATUS INDICATOR 

1 byte 



This field contains the R of the last data 
record on a shared track. 

The first byte of this 2-byte field indi- 
cates the high(0-256) record on the track 
index track. The second byte is reserved. 

This field contains the number of records 
that have been tagged for/leletion. 

This field contains a count of the number 
of random references to a nonf irst over- 
flow record. 

The contents of this field indicate how 
many bytes are needed to hold the highest 
level index in main storage. 

This field contains a count of the number 
of tracks occupied by the highest level 
index. 

This field contains a count of the number 
of records in the prime data area. 

The eight bits of this byte are used for the 

following indications; 

Bit 0-1 : must remain off 

Bit 2 : file closed for ADD or ADDRTR 

Bit 3-5 : must remain off 

Bit 6 : last block full-Bit 7: last track full 



D20 



ADDRESS OF CYLINDER This field contains the address of first track 
INDEX of the cylinder index, in the form MBBCCHH. 

7 bytes 



ADDRESS OF LOWEST 
LEVEL MASTER INDEX 
7 bytes 



ADDRESS OF HIGHEST 
LEVEL INDEX 

7 bytes 

D21 LAST PRIME DATA 

RECORD ADDRESS 

8 bytes 

D22 LAST TRACK INDEX 

ENTRY ADDRESS 
5 bytes 

D23 LAST CYLINDER INDEX 

ENTRY ADDRESS 
5 bytes 

D24 LAST MASTER INDEX 

ENTRY ADDRESS 
5 bytes 

D25 LAST INDEPENDENT 

OVERFLOW RECORD 
ADDRESS 
8 bytes 



This field contains the address of the first 
track of the lowest-level index of the high 
level indexes, in the form MBBCCHH. 

This field contains the address of the first 
track of the highest level master index, in 
the form MBBCCHH. 

This field contains the address of the last 
data record in the prime data area, in the 
form MBBCCHHR. 

This field contains the address of the last 
normal entry in the track index on the last 
cylinder in the form CCHHR 

This field contains the address of the last 
index entry in the cylinder index in the 
form CCHHR. 

This field contains the address of the last 
index entry in the master index, in the form 
CCHHR. 

This field contains the address of the last 
record written in the current independent 
overflow area, in the form MBBCCHHR. 



STANDARD DASD FILE LABEL , FORMAT 2 (. . ..Cont'd) 



FIELD NAME AND LENGTH 

D26 BYTES REMAINING ON 
OVERFLOW TRACK 
2 bytes, binary 

D27 NUMBER OF INDEPEN- 
OVERF LOW TRACKS 
2 bytes, binary 

D28 OVERFLOW RECORD 

COUNT 
2 bytes, binary 

D29 CYLINDER OVERFLOW 

AREA COUNT 

2 bytes, binary 

D30 DUMMY TRACK INDEX 

ENTRY 

3 bytes 

D31 POINTER TO FORMAT 

3 FILE LABEL 
5 bytes 



DESCRIPTION 

This field contains the number of bytes 
remaining on current independent 
overflow track. (OS/VS only) 

This field contains the number of tracks 
remaining in independent overflow area. 

This field contains a count of the number 
of records in the overflow area. 



This field contains the number of 
cylinder overflow areas full. 

This field contains the HHR portion of 
the dummy track index entry. 
(OS/VS only) 

This field contains the address(in the 
form CCHHR) of a Format 3 file label 
if more than 3 extent segments exist for 
the data file within this volume. 
Otherwise it contains binary zeros. 
(OS/VS only) 



FIELD NAME AND LENGTH 



STANDARD DASD FILE LABEL , FORMAT 3 



Format 3: This format is used to describe extra extent segments on the volume if there 
are more than con be described in the Format 1 (and Format 2 if it exists) file label. 
This file label is pointed to by a Format 1, Format 2, or another Format 3 file label. 



Field 


Extent Typ 


e Indicator 
















































1 
Key 
Identi- 
fication 


Extent 1 


Extent 2 


Extent 3 


Extent 4 


18 


Exter 


t5 


Extent 6 


Exten 


t7 


2 




Lower 
Limit 


Upper 
Limit 
























17 


19 






















30 


^ ^^^r. 2 


z. ;2t!f3 






xiu- 






^^ 






^ 


ir-< 






ss 








s 






iC 









Extent 


Sequence Number 






















Format Identifier 






Extent 8 


Extent 9 


Extent 10 


Extent 1 1 


Extent 12 


Extent 13 


55 


31 














































54 


f5 






a 


s§ 






^^ 






m^o 
oo 






jn-o 






ss 






? 


§ § 



FIELD 
1 



NAME AND LENGTH 

KEY IDENTIFICATION 
4 bytes 



FIELD NAME AND LENGTH 



EXTENTS (in KEY) 
40 bytes 

FORMAT IDENTIFIER 
1 byte, EBCDIC numeric 



Each byte of this field contains the Hex code 19-54 ADDITIONAL 
03 in order to avoid conflict with a data EXTENTS 

file name. 90 bytes 

Four groups of fields identical in format to 55 POINTER TO NEXT 

fields 21-24 in the Format 1 label are con- FILE LABEL 

tained here. 5 bytes 



Nine groups of fields identical in format 
to fields 21-24 in the Format 1 label 
are contained here. 

This field contains the address(in the form 
CCHHR) of another Format 3 label if 
additional extents must be described. 
Otherwise, it is all binary zeros. 



STANDARD DASD FILE LABEL , FORMAT 4 



This format is used to describe the Volume Table 
of Contents and is always the first label in the 
VTOC. There must be one and only one of these 
Format 4 file labels per volume. 



•Number of Alternate Tracks 
•VTOC Indicators 
•Number of Extents 
Reserved 




Extent Sequence Number 



Format ID — ' 



' Available File Label Records. 









Extent J 


ype 


-| 


1 






■""" '" .w«..«^.v.. ,.w .^.^w. 


VSAM indicator 


lOA 


lOB 
Reserved 


♦ iVTOC Extent 


15 
Reserved 


VSAM 
Times tamp 


h 


'5< 

1=6 


compatibility) 


11 




Lower 
Limit 


14 
Upper 
Limit 


fc 3 




sgfe 


g ^ 


§ s^ 


2 E 


Cj lOsO Q^ 



FIELD NAME AND LENGTH 



FIELD NAME AND LENGTH 



KEY FIELD 

44 bytes, binary 

FORMAT ID 

1 byte, EBCDIC numeric 

LAST ACTIVE FORMAT 1 
5 bytes 



NEXT AVAILABLE 
ALTERNATE TRACK 



Each byte of this field contains the Hex 
code 04 in order to provide a unique key. 

4 : Format 4 . 



Contains the address(in the form CCHHR) 
of the last active Format 1 file label.lt 
Is used to stop a search on a file name. 
(OS/VSonly) 

Contains the address(in the form CCHH) 
of the next track to be assigned as an 



4 bytes 

NUMBER OF ALTER- 
NATE TRACKS 
2 bytes, binary 

VTOC INDICATORS 



alternate for a bad track. 

Contains the number of alternate tracks 
available. 



Bit 0,if on indicates no DADSM(Format 5) 

lobe I, or DADSM label does not reflect 

true status of volume. 

Bits 1,2 not used. 

Bit 3, if on indicates a stacked pack for the 

1401/1440/1460 Emulator Program. 

Bits 4-7 ore not used. 



STANDARD DASD FILE LABEL , FORAAAT 4 (....Cont'd) 



FIELD NAME AND LENGTH 
8A 



DESCRIPTION 



NUMBER OF EXTENTS Contains the hexadecimal constant 01, to 

1 byte indicate one extent in the VTOC. 

8B RESERVED Reserved 

2 bytes 

9 DEVICE CONSTANTS This field contains constants describing the 

14 bytes device on which the volume was mounted 

when the VTOC was created. The following 
describes each of the subfields: 

Device Size: (4 bytes)-The number of cylinders(CC) and tracks per cyl- 

- inder(HH). 

"Track Length: (2 bytes)-The number of available bytes on a track exclusive 

•J of home address and record zero. (record zero is assumed to 

be a nonkeyed record with an eight bytes data field) 
Record Overhead: (3 bytes)-The number of bytes required for gaps, check bits, 
and count field for each record. This value varies according 
to the record characteristics and thus is broken down into 
three three subfields. 

I: Overhead required for a keyed record other than the last 

record on the track. 
L: Overhead required for a keyed record that is the last 

record on the track. 
K: Overhead bytes to be subtracted from I or L if the record 
does not have a key field. 
Flag: (1 byte)-Further defines unique characteristics of the device. 



Bits: 0-5 : Resented 

6/7 : CC and HH must be used as 1-byte values, as in the 
case of the 2321. A tolerance factor must be applied 
to all but the last record on the track. 
Tolerance: (2 bytes)-A value that is to be used to determine the ef- 

fective length of the record on the track. The effective 
length of a record is calculated in the following manner : 

1 Add the key length to the data length of the record 

2 Test bit 7 in the flag byte : 

a. If 0, go to step 3 

b. Multiply value from step 1 by the tolerance factor 

c. Shift result 9 bits to the right 
3. Add overhead bytes to the result. 

Note : Step 2 is not required if the calculation is for the 
last record on the track. 
Labels/track: (1 byte)-A count of the number of labels that can be written 

on each track in the VTOC. (Number of full records of 
44-bytes key and 96-bytes data lengths that can be contain- 
ed on one track of this device) 
Directory Blocks/ (1 byte)-A count of the number of directory blocks that can 
Track be written on each track for an OS/VS partitioned data set. 

(Number of full records of 8-byte$ key and 256-bytes data 
lengths that can be contained on one track of this device) 



STANDARD DASD FILE LABEL, FORMAT 4 (...Cont'd) 



FIELD NAME AND LENGTH 



FIELD NAME AND LENGTH 



9 DEVICE CONSTANTS 


The following 


illustrates the devi 


ce con- 


IDA 


VSAM CATALOG 


(.. 


.Cont'd) 




stants fi 


ield for the various direct 


access 


(Cont'd) (1 byte) 










devices 














TT of CRA 
(2 bytes) 


Device 


CC 


HH 


Track 
Length 


J. 


L 


K 


Flag. 


Tol. 


Labels 
Track 




VSAM TIMESTAMP 
(8 bytes) 


2311 
2314/2319 


203 
203 


10 
20 


3625 
7294 


81 
146 


20 
45 


20 
45 


1 
1 


537 
534 


16 
25 


IQB 


RESERVED 
(10 bytes) 


3330 


411 


19 


13165 


191 


191 


56 





512 


39 




3330-1 1 


815 


19 


13165 


191 


191 


56 





512 


39 


11-14 


VTOC EXTENT 


= 3340/35MB 


350 


12 


8535 


242 


242 


75 





512 


22 






55 3340/70MB 


700 


12 


8535 


242 


242 


75 





512 


22 






3350 


555 


30 


19254 


267 


267 


82 


8 


512 


46 







RESERVED 
(25 bytes) 



Note ; Labels per track 



track length 



I + label length 



VSAM INDICATORS 
(19 bytes) 



The VSAM indicators are present on 
any volume that contains space 
allocated to VSAM. If a volume 
does not contain any VSAM-owned 
space, these fields are set to zeros. 



DESCRIPTION 

BitO-1 : This volume is ov/ned by 

a VSAM catalog. 
Bit ]-7: Unused 

Relative track number of first track 
of catalog recovery area 



These fields describe the extent of 
the VTOC and are identical in 
format to fields 21-24 of the 
Format 1 file label. Extent type 
01 (prime date area). 

Reserved 



VSAM TIMESTAMP 
(8 bytes) 



Is the time the most recent VSAM 
data space was added to the volume. 



STANDARD DASD FILE LABEL , FORMAT 5 
rField 



(Note; Format- 5 Label used by OS/VS only) 



Available 
Extent 



Available Extents in Key 




1 — Key Identification 




1 Format Identif 


er 






28 


29 
Pointer 




Available Extents 




to next 
Format 5 


c? 




^ 


2 § 



FIELD NAME AND LENGTH 

1 KEY IDENTIFICATION 

4 bytes 

2 AVAILABLE EXTENT 

5 bytes 



DESCRIPTION 
Each of these four bytes is an hex 05. 

This field indicates an extent of space avail- 
able for allocation to a data file. The first 
two bytes ore relative track address. The next 
two are the number of full cylinders included 
in the extent. The bst byte is the number of 
tracks in addition to the cylinders in the ex- 
tent. 



FIELD NAME AND LENGTH DESCRIPTION 

3-9 AVAILABILITY EXTENTS These fields are identical to field 2 

IN KEY 35 bytes 



FORMAT IDENTIFIER 
1 byte EBCDIC numeric 

AVAILABLE EXTENTS 
90 bytes 

POINTER TO NEXT 
FORMAT 5 



They ore in relative track address sequence. 
5 : Format 5 

These fields are the same as field 2. There are 
26 available extents fields in the Format 5 
label. 

Contains the address(in the form CCHHR) of 
the next Format 5 file label if one exists. 



LABEL INFORMATION CYLINDER 





DEVICE TYPES 


3340 

(see < 
Note 2) 


Trac 

1 
2 
3 
4 
5 
6 
7 
8 
9 
10 
11 

18 
19 

29 










2314 
2319 


3330 ' 


BG (USRLABEL) 


Temporary 




BG (PARSTD) 


Standard (Permanent) 




F2 (USRLABEL) 


Temporary 




F2 (PARSTD) 


Standard (Permanent) 




Fl (USRLABEL) 


Temporary 




Fl (PARSTD) 


Standard (Permanent) 




(STLABEL) 






Standard Labels 






for All Partitions 




3350 < 


t 


























► Standard (Permanent) 










Additional Standard Labels | 








































1 





Note 1 : The layout of the label infor- 
mation cylinder depends on the number 
of partitions defined in your system. 
This example assumes that three partitions 
are present. For more information see 
DOS/VSE Serviceability Aids and 
Debugging Procedures. 

Note 2: For the 3340, a second lobe! 
information cylinder is provided 
containing 12 standard label tracks 
for all partitions. 



LABEL Information Cylinder Layout and Record Format (see Note 1) 



LIOCS MODULE NAME VERSUS OPTIONS 



character / ■► 1 2 3 



F RECFORM=flXUNB 
(always for TYPEFLE= 
INPUT,TYPEFLE= 
CMBNDorFUNC=l 
files) 
V RECFORM= VARUNB 
U RECFORM= UNDEF 



aLCHR=ASA(not 
specified if CMBND) 
CTLCHR=YES 
CONTROL= YES 
CTLCHR or CON- 
TROL not specified 



B RDONLY= 

TYPEFLE= 

C TYPEFLE= 

H RDONLY= 

TYPEFLE= 

I TYPEFLE= 

N RDONLY^ 

TYPEFLE= 

O TYPEFLE: 



: YES and 
CMBND 
CMBND 
YES and 
INPUT 
INPUT 
■= YES and 
OUTPUT 
OUTPUT 



Z WORKA and ICAREA2 

not spec! f ied 
W WORKA= YES 
I IOAREA2= YES 
B WORKA and IOAREA2 
Z WORKA=YESnot 

specified (CMBND 

file only) 



DEVICE=2540,3881 

DEVICE= 1442,2596 

DEVICE=2520 

DEVICE=2501 

DEVICE=2540 and 

CRDERR 

DEVICE=2520 and 

CRDERR 

DEVICE=3505or 

3504 

DEVICE= 3525 and 

FUNC=R/Por 

omitted 

DEVICE=2560 and 

FUNC=R/Por 

omitted 

DEVI CE= 3525 and 

FUNC=RP 

DEVICE= 3525 and 

FUNC=RW 

DEVICE= 3525 and 

FUNC=PW 

DEVICE= 3525 and 

FUNC=I 

DEVICE= 3525 and 

FUNC=RPW 

DEVICE=2560 and 

FUNC=RP 



LIOCS MODULE NAME VERSUS OPTIONS (....Cont'd) 



character / ♦ 


1 


2 


3 


4 


5 


6 


7 


8 


CDMOD 
(Cont'd) 
















G DEVICE=2560 and 

FUNC=RW 
H DEVICE=2560 and 

FUNC=PW 
1 DEVICE=2560 and 

FUNC=I 
J DEV1CE=2560 and 

FUIMC=RPW 
K DEVICE=5425 and 

FUNC=RP 
L DEVICE=5425 and 

FUNC^RW 
M DEVICE=5425 and 

FUNC=PW 
N DEVICE=5425 and 

FUNC=I 
O DEVICE=5425 and 

FUNC=RPW 


DIMOD 


1 


J 


J 


F always 


C non-RPS version 

of module 
V RPS data set 


B TYPEFLE=OUTPUT 
(processes both in 
put and output) 

1 TYPEFLE=INPUT 


1 IOAREA2=YES 

Z IOAREA2=YES is 

not specified 


C RDONLY=YES 
D RDONLY=YESis 
not specified 


DRMOD 


1 


J 


M 


Z 


S SETDEV=YES 

Z SETDEV=YES 

not specified 


R RDONLY=YES 
Z RDONLY=YESnot 
specified 


D always 


always 


DUMOD 


1 


J 


N 


D 


1 =DUMODFI 
O =DUMODFO 


C ERROPT=YES and 

ERREXT=YES 
E ERROPT=YES 
Z neither is specified 


Z 


Y RDONLY=YES 

Z RDONLY not specified 



LIOCS MODOlc NAME VERSUS Oh, .ONS (. . . .Cont'd) 



character/ 4 


1 


2 


3 


4 


5 


6 


7 


8 


MRMOD 


1 


J 


u 


S Address^SINGLE 
D Address^DUAL 


z 


Z 


z 


Z 


MTMOD 
(GET/PUT) 


1 


J 


F 


F RECFORM=FIXUNB 

(orFIXBLK) 

(EBCDIC mode) 
X RECFORM=flXUNB 

(orFIXBLK) 

(ASCII mode) 
V RECFORM=VARUNB 

(or VARBLK) 

(EBCDIC mode) 
R RECFORM=VARUNB 

(or VARBLK) 

(ASCII mode) 
S RECFORM=SPNUNB 

(or SPNBLK) 

(spanned records) 
U RECFORM^UNDEF 

(EBCDIC code) 
N RECFORM=UNDEF 

(ASCII mode) 


B READ=BACK 

Z READ^FORWARD or 

if READ is not speci 

fied 


C CKPTREC=YES 

Z CKPTREC=YES is 

not specified 


W WORKA=YES 
Z WORKA=YES is not 
specified 


M ERREXT=YES and 

RDONLY=YES 
N ERREXT^YES 
Y RDONLY=YES 
Z ERREXT and RDON 
LY not specified 


MTMOD 
(WORKFILE) 


I 


J 


F 


W always 


E ERROPT=YES 

Z ERROPT is not 

specified 


N NOTEPNT=YES 
S NOTEPNT=POINTS 
Z NOTEPNT is not 
specified 


Z always 


M ERREXT=YESand 

RDONLY=YES 
N ERREXr=YES 
Y RDONLY=YES 
Z ERREXT and RDON 
LY not specified 



LIOCS MODULE NAME VERSUS OPTIONS (. . . .Cont'd) 



character / 1^ 


1 


2 


3 


4 


5 


6 


7 


8 


ORMOD 


1 


J 


M 


f recform=fixunb 

X RECFORM=flXBLK 

U RECFORM=UNDEF 

D RECFORM=UNDEF 

and BLKFAC=YES 


C CONTROL=YES 

Z CONTROL=YES is 

not specified 


1 IOAREA2=YES 
W WORKA=YES 
B both are specified 
Z neither is specified 


T device is in tape 
mode 

D device is in docu- 
ment mode 


Z always 


PRMOD 


1 


J 


D 


F RECFORM=FIXUNB 
V RECFORM-VARUNB 
U RECFORM=UNDEF 


A CTLCHR=ASA 

Y CTLCHR=YES 

C CONTROL=YES 

S STLIST=YES 

Z none of these is spe- 
cified 

T DEVICE=3525with 
2-line printer 

U DEVICE=2560 

V DEVICE=5425 


B ERROPT=YES and 
PRINTOV=YES 

P PRINTOV=YES, 
DEVICE is not 3525 
and ERROPT is not 
specified 

1 PRINTOV=YES, 
DEVICE=3525and 
FUNC=WCTDor 
omitted 

F PRINTOV=YES, 
DEVICE=3525 and 
FUNC=RWtT3 

C PR!NTOV=YES, 
DEVICE=3525 and 

func=pwct: 
d printov=yes, 

DEVICE=3525 and 

func=rpwlt: 

Z PRINTOV=YES and 
ERROPT not speci- 
fied and DEVICE is 
not 2560, 3525, or 
5425 


1 IOAREA2=YES 
Z I0AREA2=YES is 
not specified 


V RD0NLY=YES 
and WORKA=YES 

W WORKA=YES 

Y RDONLY=YES 

Z neither is specified 



LIOCS MODULE NAME VERSUS OPTIONS (. . ♦ .Cont'd) 



character / 4 



PRMOD 
(Cont'd) 



O PRINTOV=YES not 

specified, DEVI CE= 

3525 and FyNCT= 

WCT3 or omitted 
R PRINTOV=YES not 

specified, DEVICE= 

3525 and FUNa= 

RWCT] 
S PRINTOV=YES not 

specified, DEVICE= 

3525 and FUNCT= 

PWCT3 
T PRINTOV=YES not 

specified, DEVICE= 

3525 and FUNa= 

RPW[T3 
E ERROPT=YES and 

PRINTOV=YES is 

not specified 
U FUNC=W or omitted 

and DEVICE=2560 

or 5425 
V FUNC^RWand 

DEVICE=2560 or 5425 
W FUNC=PW and 

DEVICE=2560 or 5425' 
X FUNC=RPWand 

DEVICE=2560 or 5425 



LIOCS MODULE NAME VERSUS OPTIONS (....Cont'd) 



character / 1^ 


1 


T 


3 


4 


5 


6 


7 


8 


PTMOD 


1 


J 


E 


S SCAN=YES 
Z SCAN=YES is not 
specified 


T TRANS=YES(SCAN) 
=YES is not speci- 
fied) 

Z TRANS=YES is not 
specified 


F RECFORM=FIXUNB 

and SCAN=YES 
U RECFORM=UNDEF 

and SCAN=YES 
Z SCAN=YES is not 

specified and/or 

DEVICE=1018 


1 DEVICE=1017 

2 DEVICE=1018 

Z DEVICE=2671 or if 
this entry is omitted 


Z always 


SDMOD 
(GET/PUT) 


1 


J 


G 


C SDMODFx specifies 

HOLD=YES 
F SDMODFx does not 

specify HOLD=YES 
R SDMODUx specifies 

HOLD=YES 

U SDMODUx does not 

specify HOLD=YES 
P SDMODVx specifies 

HOLD=YES and 

RECFORM=SPNBLK/ 

SPNUNB 
Q SDMODVx does not 

specify HOLD=YES 

and specifies 

RECFOR/v^SPNBLK/ 

SPNUNB 
S SDMODVx specifies 

HOLD=YES 
V SDMODVx does not 

specify HOLD=YES 


I SDMODxl (non-RPS 
version of module) 

O SDMODxO (non-RPS 
version of module) 

U SDMODxU (non-RPS 
version of module) 

W SDMODxl (RPS in-, 
put data set) 

X SDMODxO (RPS out. 
put data set) 

Y SDMODxU (RPS up- 
date data set) 


C ERROPT=YES and 

ERREXT=YES 
E ERROPT=YES 
Z neither is specified 


M TRUNCS=YES and 

FEOVD=YES 
T TRUNCS=YES 
W FEOVD=YES 
Z neither is specified 


B CONTROL=YES 

and RDONLY=YES 
C CONTROL=YES 
Y RDONLY=YES 
Z neither is specified 



LIOCS MODULE NAME VERSUS OPTIONS (....Cont'd) 



Character / 1^ 


1 


2 


3 


4 


5 


6 


7 


8 


SDMOD 


1 


J 


G 


T HOLD=YES 


C ERROPT=YES and 


N 


NOTEPNT=YES 


C 


CONTROL=YES 


T RDONLY=YESand 


(WORK FILES) 








W HOLD=YES not 
specified 


ERREXT=YES 
E ERROPT=YES 
W RPS version of 

Z neither Is specified 


R 

Z 


NOTEPNT=POINT 

RW 

NOTEPNT is not 

specified 


Z 


CONTROL=YES is 
not specified 


UPDATE=YES 
U UPDATE=YES 
Y RDONLY=YES 
Z neither is specified 


DAMOD 


T 


T 


T 


F RECFORM=FIXUNB 
B RECFORM=UNDEF 


A AFTER=YES 

W RPS version of moduU 


F 


IDLOC=YES and 
FEOVD=YES 


TT 


ERREXT=YES and 
RELTRK=YES 


W HOLD=YES and 
RDONLY=YES 










handles both UNDEF 


Z AFTER is not_ 


1 


IDLOC=YES 


p 


ERREXT=YES 


X HOLD=YES 










andFIXUNB 


specified 


R 


FEOVD=YES 


R 


RELTRK=YES 


Y RDONLY=YES 










S RECFORM=SPNUNB 




Z 


neither Is specified 


Z 


neither Is specified 


Z neither is specified 










V RECFORM=VARUNB 














ISMOD 


T 


T 


TT 


A RECFORM=BOTH, 


A IOROUT=ADDRTR 


r 


TYPEFLE=RANSEQ 


F 


CQRINDX=YES and 


F CORDATA=YES, 










IOROLrT=ADD or 


(non-RPS version of 


G 


10AREA2=YES 




HOLD=YES 


ERREXr=YES, 










ADDRTR 


module) 
1 lOROUT=ADD 




TYPEFLE=SEQNTL 
or IOROUT=LOAD 


c 
o 


CORINDX=YES 
HOLD=YES 


RDONLY=YES 










B RECFORM=FIXBLK, 


L IOROUT=LOAD(non. 


R 


TYPEFLE=RANDOM 


z 


neither is specified 


G CORDATA=YES 










IOROUT=ADD or 


RPS version of module )S 


TYPEFLE=SEQNTL 






and ERREXT=YES 










ADDRTR 


R lOROUT=RETRVE 


Z 


neither Is specified 






O CORDATA=YES 










U RECFORM=FIXUNB, 


V lOROUT=ADDRTR 




(IOROUT=LOAD or 






and RDONLY=YES 










IOROUT=ADD or 


(RPS version of 




ADD) 






P CORDATA=YES 










ADDRTR 


module) 










S ERREXT=YES and 










Z RECFORM is not 


X lOROUT=LOAD 










RDONLY=YES 










specified 


(RPS version of 










T ERREXr=YES 










(IOROUT=LOAD 


module) 










Y RDONLY=YES 










or RETRVE) 












Z neither is specified 



DTFCD (Reader) 



Bytes 1 


Bits 


Contents 


Function 


Dec 


Hex 


0-15 

16 


00-FF 

8 

10 




1 
2 
3 
4 

5-7 




^^§501 double -CCW support 

1= OMR '^ (0= Omitted 

l=ERROPT 2); 0= Omitted 

COBOL open; ignore option 

1= GET issued ^; 0= GET not issued ^ 

DTF table address constants relocated by 

OPENR 

File association: 

000= READ only 

010=READ/t»RINT'*) . 

101= readaui^jch/print 5) 

001=READ/I'UNCH5) 


17-19 


11-13 






Address of logic module 


20 


14 




X'02' 
X'05' 


DTF type 

DTF type for 2560 or 5424/5425 


21 


15 



1 
2 
3 
4 
5 
6 
7 




1= Open; 0= Closed 

Firat time switch 

1=1442 or 2596; 0= Other 

1= 2560, 3525 or 5424/5425; O=0ther 

1= 3504, 3505; 0= Other 

1=2 I/O areas; 0=1 I/O area 

1= 2520; 0= Other 

1= 2540; 0= Other 


22 


16 




B'SSFOXOIO' 

B'HOBOOOIO' 
B'HMMMOOir 


Normal command code (not for 

2560 or 5424/5425: 

SS: 00= pocket 1; Ol= pocket 2; 

10= pocket 3°' 
F : 1= Column binary 3). o= ggcQic 
X: 1= OMR or RCE ^; 0= neither 

Read command code (2560): 

H : 0= hopper 1; 1= hopper 2 

B : 0= EBCDIC; 1= column binary 

SS command code (5425). 
H:0= hopper 1, l=hopper 2. 
MMM: 001=5tacker l,010=5tacker 2. 
011=5tacker3, 100=stacker 4. 


23 


17 




B'HOBOOOIO' 


Control command code frot for 2560 

or 5424/5425). 

Read command code (2560, 5425) 


24-27 


18-1 B 






Address of IOAREA2 


28 


IG 



1 
2-7 




1= 2560; 0= Other 

1= 5424/5425; 0= Other 

Not used 


29-31 


ID-IF 






Address of EOF routine 


32-39 


20-27 






Read CCW 


Bytes 40-4 


9 as used for a 


1 files except 2560 and 5424/5425 files | 


40-43 


28-2B 




LA &iOREG,0(14) 
NOP 


Load user pointer register 


44-49 


2C-31 




MVC 0(&BLKSIZE, 
13),0(14) 
NOP 
DC X'OOOO- 


Move lOAREA to WORKA 



DTFCD (Recjder) (...Cont'd) 



Bytes 


Bits 


Contents 


Function 


bee 1 Hex 


The following bytes (50-105) are used for 2501 double-CCW support. 


50-55 


32-37 






Unused CCB 


56-71 


38-47 








72 


48 







1=OMR^O= omitted. 
l=ERROPr, 0- omitted. 






1 








2 




COBOL open; Ignore option 






3 




1= GET issued3, = GET not issued7. 






4 




DTF table address constants 
relocated by OPENR. 






5-7 




File Association 

000 = READ only . 

010= READ/PRINT . 
101 =READ/PUNCKZPRINT 

001 = READ/PUNCH^. 


























73-75 


49-4 B 






Address of logic module. 


76 


AC 




X'02' 
X'05' 


DTF type. 

DTF type for 2560 or 5424/5425, 


77 


4D 



1 
2 
3 
4 
5 
6 
7 




l=open; 0= closed 

First time switch 

1=1442 or 2596; = other. 

1=2560,3525, or 5424/5425; 0=Other. 

1=3504 or 3505; 0= other. 

1= 2 I/O areas; = 1 O/l area. 

1= 2520; 0= other. 

1= 2540; 0= other. 


78 


4E 




B'SSFOXOIO' 


Normal command code (not for 2560 

or 5424/5425. 

SS: 00 = pocket 1,. 01 =pocket2, 

10= pocket 3*. „ 
F : 1= column binaryj^, 0= EBCDIC. 
X: 1 =OMRorRCE , 0=neither. 
































B'HOBOOOIO' 


Read command code (2560, 5424/5425) 

H: 0= hopper 1, 1 =hopper2. 

B : = EBCDIC, 1 = column binary. 


79 


4F 




B'HOBOOOIO' 


Control command code (not for 2560 

or 5424/5425). 

Read command code (2560, 5424/5425). 


80-83 


50-53 






Address of IOAREA2. (If IOAREA2 is 
not specified, address of lOAREAl). 



D7FCD (Reader) (...Confd) 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


84 
85-87 


54 
55-57 



1 
2-7 




1 = 2560; = other. 

1 = 5424/5425; = other. 

Not used. 

Address of EOF routine. 






88-95 


58-5F 




Read CCW. 


96-99 


60-63 


LA &10REG, 0(14) 
NOPO 


Load user pointer register. 


100-103 


64-67 


1 
MVC (&BLKSIZE, 13), 0(14) Move lOAREA to WORKA 
NOPO 


104-105 


68-69 


DC X'OOOO- 




The following bytes (50-57) are used for 3504, 3505, and 3525 associated files. 


50-53 


32-35 




DC A (name) 
B 16(15) 
B 20(15) 
DCF'O' 


If ERROPT=name^. 
If ERROPT=SKIP. 
If ERROPT=IGNORE. 
If ERROPT=omitted. 


54-57 


36-39 




DCA(ASOCFLE) 


Address of associated DTF table . 
(3525 only). 


Bytes 40 onward a 


used for 2560 and 5425 files. 


40-47 


28-2F 






Stacker select CCW (2560). 
Read CCW (5424/5425). 


48-51 


30-33 




LA &IOREG,0(14) 
NOPO 




52-57 


34-39 




MVC 0(&BLKSIZE, 

NOPO 

DC X'OOOO' 


3), 0(14) Move IOAREA to WORKA 


58-63 


3A-3F 




CLC0(L,14),64(1) 


Test for end of file. 

L-4 if MODE=C; L=2 in other cases. 


64-67 


40-43 




DCC'/* ■ 

DC X' QC001022' 


End-of-file indicator if MODE=E 
In other cases. 



DTF CD (Reader) (...Cont'd) 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


68-71 


44-47 




DC A(name) 
B 16(15) 
B 20(15) 
DCF'O' 


If ERROPT=name^. 
if ERROPT=SKIP. 
If ERROPT=IGNORE. 
If ERROPT=omitted. 


72-75 


48-4B 




DC A(ASOCFLE) 


Address of associated DTF table . 


76-81 


4C-51 




MVC (&BLKSIZE, 


14), 82(1) 
Move card image to 10 AREA 1 


82 


52 




DC &BLKSIZE.C' ' 


Buffer for card image. 



1 OMR only for 3504 and 3505. 

2 ERROPT for 2560, 3504, 3505, 3525, 5424/5425 READ file. 

3 3504, 3505, and 3525 with or without CONTROL=YES specified. 

4 2560, 3525, or 5424/5425 with or without CONTROL=YES specified. 

5 2560, 3525, or 5424/5425 without CONTROL=YES specified. 

6 Defaults to pocket2 for 3504, 3505, and 3525. 

7 Present only when 2560, 3525, or 5424/5425 associated files are specified 
for the input DTF. 



I 



DTFCD (Punch) 



By. 


es 


Bih 


Confents 


Function 


Dec 


Hex 


0-15 


00-FF 






CCB 


16 


10 




1 
2 
3 
4 

5-7 




Not used 

1= ERROPT 3); 0= Omitted 

COBOL open; ignore option 

1= PUT issued 27; 0= PUT not issued 

DTF table address constants relocated 

by OPENR 

File Association: 

000= PUNCH only 

011=PUNCH/I'RINT3) 

001= READ/1>UNCH 3) 

101= READ/PUNCH/fRINT 3) 

100= PUNCH/INTERPRET 3) 


17-19 


11-13 






Address of logic module 


20 


14 




X'04' 


DTF type 


21 


15 




1 
2 
3 
4 
5 
6 
7 




1= Open; 0= Closed 

First time switch 

1= CTLCHR 

1= Fixed unblocked 

1= Variable unblocked 

1= 2 I/O areas 

l=Workarea 

1= 2 CCWs in table; 0= 1 CCW in table 


22 


16 




B'SSFOOOOl' 
B'HSSSOOir 


Normal command code: 

SS : 00= pocket 1; 01= pocket 2; 

10= pocket 3 4) 
F : 1 = column binary; 0= EBCDIC 

Normal stacker select command code 
(2560 or 5424/5425). 
H :0= hopper 1;1= hopper 2 
SSS: stacker information 


23 


17 




B'HSSSOOir 


Control command code (not for 2560 
or 5424/5425). 

Actual stacker select command code 
(2560 or 5424/5425) 


24-27 


18-lB 




DCA(IOAREAl-bc) 


Address of data in lOAREAl 


28-31 


IC-IF 






Bucket 1) 


32-33 


20-21 




LR12,(RECSIZE) 


Undefined records only 


34-37 


22-25 




LA&IOREG,4(14) 
NOPR 


Load user pointer register 


38 


26 


0-2 
3 
4 
5 
6 
7 




Not used 

1= 5424/5425 

1= 2560 

1=3525 

1=1442 or 2596 

1= 2520B1 


39 


27 


.-J 


DCC ■ 


Blank for eject last card 



DTFCD (Punch) ( Cont'd) 



Bytes 


Bits 


Contents 


Function 


Dec 1 Hex 


For all files except 2560 and 5425 files: 


40-47 


28-2F 






Punch CCW 


48-55 


30-37 






Eject CCW for last cad if 2520 


For 2540 files if CRDERR is specified | 


48-55 


30-37 






Retry CCW 


56-135 


38-87 




DC CL80' ' 


Savearea card image 


For 3525 PUhJCH/lhfTERPRET files I 


48-55 


30-37 






Load CCW 


56-63 


38-3F 






Print CCW 


64-127 


40-7F 




DC64C' ' 


Print buffer 


For 3525 Associated files | 


48-51 1 30-33 1 1 DC A(ASOCFLE) 


Pointer to associated file | 


For 2560 and 5424/5425 files | 


40-47 


28-2F 




DCD'O' 


Eject CCW 
lfFUNC=RPorRPW 


48-55 


30-37 






Stacker select CCW 


56-63 


38-3F 






Punch and Feed CCW 


For 2560 PUNCH/INTERPRET files | 


64-71 


40-47 






Load print head buffer 1 CCW 


72-79 


48-4F 






Load print head buffer 2 CCW 


80-87 


50-57 






Print CCW 


88-151 


58-97 




DC 64C' ' 


Save area for printing line 2 


For 5425 PUNCH/ltvJTERPRET files | 


64-71 1 40-47 1 1 


Print CCW 1 


For 2560' and 5424/5425 Associated files | 


64-67 


40-43 




DC A(ASOCFLE) 




68 


44 




DCC" 
DCX'OO- 


If mode is EBCDIC 

If mode is Column Binary 


69- 


45- 




DC&BLKSIZE.C ' 


Buffer for card image 



I 



1) The bucket bytes handle undefined length records 

2) Valid for 2560 or 3525 READ/PUNCH, PUNCH/PRIKT, and READ/PUNCH/PRINT files 

3) Valid for 2560 or 3525 only . (3504, 3505, 5425) non- associated files 

4) Defaults to pocket 2 for 3525 



DTFCD (Combined Reader/Punch) 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


-15 


00-OF 






CCB 


16 


10 


0-1 

2 

3 

4 

5-7 




Not used 

COBOL open; ignore option 

Not used 

OPENR relocates DTF address constants 

Not used 


17-19 


11-13 






Address of logic module 


20 


14 




X'OO' 


DTF type 


21 


15 






Command code (X'02' for 1442, X'C2' 
for 2520, 2540) 


22 


16 






Command code (X'OT for 1442, X'09' 
for 2520, 2540) 


23 


17 






Corrmand code (X'Ol' for 1442, X'09' 
for 2520, 2540) 


24-31 


18-lF 






CCW 


32-35 


20-23 






Input area address 


36-39 


24-27 






Output area address 


40-41 


28-29 






Input blocksize 


42-43 


2A-2B 






Ouput blocksize 


44-49 


2C-31 




MVCO(&BIJ<S, 
13,0(14) 




50-55 


32-37 




MVC (&OUBL, 
14),0(13) 




56-59 


38-3B 






End-of-f He address 


60-67 


3C-43 






Save area 


68-73 


44-49 




MVC 1 (&OUBL-1, 
13),0(13) 




7A-77 


4A-4D 




MVI0(13),X'40' 




78-79 


4E-4F 






Constant (blanks) 


80-83 


50-53 






Constant address (bytes 78-79) 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


-15 


00-OF 






CCB 


16 


10 



1 

2 
3 
4 
5-7 




1= 2-line printer (3,4); 0= Other 

1= ERROPT (3,4). 0= Omitted 

COBOL open; ignore option 

1= 3525; 0= Other 

OPENR relocates DTF address constants 

000= PRINT only 

011= PUNCH/PRINT 3) 

010= READ/PRINT 3) 

101= READ/PUNCH/PRINT 3) 


17-19 


11-13 






Address of logic module 


20 


14 




X'08' 
X'07' 


DTF type 

DTF type for 2560 and 5424/5425 


21 


15 




1 
2 
3 
4 
5 
6 
7 




l=Open; 0= Closed 

First time switch 

1= Control character 

1= Fixed unblocked records 

1= Variable unblocked records 

1= 2 I/O areas 

1=Workarea 

1= Print overflow channel 9 


For Printer and Car 


dPun 


;h devices | 


22 
23 
24-27 


16 
17 
18-lB 




X'09' 
X'09' 
DC A(IOAREAl+x) 


Normal command code •^' 
Control command code ^) 
Address of data in lOAREAl 


28-31 
32-33 

34-37 


IC-IF 
20-21 

22-25 




LR 12,(RECSIZE) 

NOPRO 

LA &IOREG,4(14) 

NOPO 


Bucket ') 

For undefined records only 

Only if IOREG=(r) 


38-39 
40-47 

48-55 


26-27 
28-2F 

30-37 




11,*,X'60',1 

9,IOAREA,X'20', 

121 

9,IOAREA,X'20', 

121 

A (Name) 

DCA(ASOCFLE) 


Bucket 2) 

CCW- Set up Selective Tape List Control 

STLIST not specified 6) 

CCW- STLIST specified 6) 

Address of user error routine (for all the 
3211 -compatible printers identified by 
device type code PRT1) 

If ASOCFLE= filename 3) 


For the 2560 and 5A 


24/54 


25 Multi Function Card Mactiine 1 


22 


16 




X'OO' 


Not used 


23 


17 




B'HHHHHHOO' 


Print head selection byte 

H= 1 specifies the corresponding head 


24-27 


18-lB 






Address of lOAREAl 



I 



DTFPR (....Cont'd) 



Bytes 


Bits 


Contents 


Function 


Dec 1 Hex 


For the 2560 Multi 


Function Card Machine (Cont'd) 1 


28-31 


IC-IF 






Bucket 


32-33 


20-21 




LR 12,(RECSIZE) 
NOPR 


For undefined records only 


34-37 


22-25 




lA &iOREG,4(14) 
NOPO 


Only if IOREG= (r) 


38-39 


26-27 






Number of bytes to be printed by the lost 
specified print head 


40-43 


28-2B 




DC A(ASOCFLE) 
DCF'O' 


If FUNC=RW,PWorRPW 
In allother cases 


44 


2C 




1 
3 

4-7 




1=2560 
Not used 

1= Print control switch for 2560 associa- 
ted files 
Not used 


45-47 


2D-2F 




DC 3X'00' 


Reserved for future use 


For 2560 simple files | 


48-55 


30-37 






Eject CCW 


56-63 


38-3F 






Load print head buffer CCW 


64-71 


40-47 






Print CCW 


For 2560 ossocictec 


files 




48-55 


30-37 






Load print head buffer CCW 


56-63 


38-3F 






Print CCW 


For 5424/5425 files | 


48-55 


30-37 






Print CCW 



1) The bucket bytes handle undefined records. Bit of byte 28 at open time determines 
the mode set of a printer with UCS. If bit 0= 1, the mode is set so that data checb 
occur if an invalid character is printed. Otherwise, mode is set to suppress data checks. 
The use of the UCS parameter determines the setting of this bit. If STLIST= YES, byte 
31 saves the STLIST control byte provided by the PUT macro. 

2) The 2 byte bucket saves print overflow conditions if CTLCHR= ASA. If STLIST=YES, 
byte 38 contains the current STLIST control byte. Byte 39 is set by the PUT macro to 
indicate spacing or skipping. (X'OO' no spacing, no skipping; X'Ol' spacing; 

X'02' skipping). 

3) Valid for 2560, 3525 READ/PRINT, PUNCH/PRINT and READ/PUNCH/PRINT files. 

4) Valid for 3525 PRINT only files. 

5) X'05' for 3525; X'09' for other devices 

6) Valid for 1403 only 



B). 


e$ 


Contents 


Function 


Dec 


Hex 


-15 


00-OF 




CCB 


16 


10 


X'20' 
X'08' 


COBOL open; ignore option 
DTF table address constants relo- 
cated by OPENR 


17-19 


11-13 




Address of logic module: 
GET and PLTT logic if TYPEFLE= 
INPLTT; PLTT logic if TYPEFLE= 
OLfTPL/T; GET,PLfTand PUTR 
logic If TYPEFLE= CMBND 


20 


14 


X'03' 


DTF type 


21-23 


15-17 




For input and output: not used 
For combined: byte 21 contains 
X'Or and bytes 22-23 contain 
INPSIZE 


24-31 


18-lF 


X'09',IOAREA1,X'00', 
BLKSIZE 


CCW 


End of ta 
added if 


ble if RECF 
WORKA is 


"ORM=FIXUNB and WORKA not specified. The following bytes ore 
specified. 


32-35 


20-23 


DC A(IOAREAl) | Address of I/O area 


36-39 


24-27 


DC F '0' Register save area 


40-43 


28-2B 


DC F'O' Register save area 


. End of to 


ble if RECF 


■ORM=FIXUNB. The following bytes are added if RECFORM=UNDEF 






DC F'O' 


Register save area 






DC F'O' 

DC H'BLKSIZE' 

DCAL2(BLKSIZE-1) 


Register save area 

I/O area size 

For input files only 


The folio 


wing bytes 


are added to the table if TYPEFLE= CMBND 


32-35 


20-23 


DC AdOAREAl+BLKSIZE) 


I/O area address for input 


36-37 


24-25 


DC H'BLKSIZE' 


Blocksize 



Byl 


es 


Bits 


Contents 


Function 


Dec 


Hex 


-15 


00-OF 






CCB 


16 


10 


0-1 

2 

3 

4 

5-7 




Not used 

COBOL open; ignore option 

Not used 

OPENR relocates DTF table addresses 

Not used 


17-19 


11-13 






Address of logic module 


20 


14 




X'CO' 


DTF type 


21 


15 



1 

2-5 
6 

7 


B'r 

B'OOOO' 

B'l' 

B'O' 


PIOCS switches: 
1= open; 0= closed 
Input 
Not used 
Device is 3886 
Not used 


22 


16 






Error indicator byte 


23 


17 


0-4 

5 

6 

7 


B '00000 ■ 


LIOCS switches: 

Not used 

1= SETDEV 

1= Control passed to COREXIT 

1=FR loaded from disk 


24-31 


18-lF 






FR phasename at open time 


32-39 


20-27 






Phasename of currently used FR 


40-43 


28-2B 




X'OOOOOOOO' 


Not used 


44-47 


2C-2F 






Start address of FR area in DTF 


48-51 


30-33 






Address of four-byte pointer at the end 
of the FR area in the DTF 


52-55 


34-37 






EOF routine address 


56-63 


38-3F 






Scan CCW 


64-71 


40-47 






Read CCW 


72-79 


48-4F 






Read CCW 


80-87 


50-57 






Control CCW 


88-95 


58-5F 






Load format record CCW 


96-99 


60-63 






COREXIT routine address 


100-103 


64-67 






lOAREAl area address 


104-107 


68-6B 






Header area address 


108-111 


6C-6F 






Exit indicator address 


112 


70 






Start of FR area 



Byt 


es 


Bits 


Function 


Dec 


Hex 


-15 


00-OF 




Dummy CCB 


16 


10 


0-1 

2 

3 

4 

5-7 


Not used 

COBOL open; ignore option 

Not used 

DTF table address constants relocated by OPENR 

Not used 


17-19 


11-13 




Address of logic module 


20 


14 




DTF type, (X'09') 

DTF type, (X'OA" if HEADER=YES) 


21 


15 



1 
2 
3 

4 
5 
6 

7 


PIOCS switches: 

l=Open; 0= closed 

1= Input 

1= Control 

1= Device is 1287 

1= Header 

Reserved for future use 

1 = RDLNE 

Not used 


22 


16 




Not used 


23 


17 


0-6 

7 


Not used 

1= LIOCS posts a hopper empty condition to DTF 


24-39 


18-27 




CCB 


40-47 


28-2F 




Sense CCW 


48-51 


30-33 




Lost lines (equipment check) 


52-55 


34-37 




After 9 retries for journal tape, or after 2 retries for documents 


56-59 


38-3B 




Wrong length records 


60-63 


3C-3F 




After 4 retries for Journal tape, or after 2 retries for documents 


64-67 


40-43 




Keyboard corrections 


68-71 


44-47 




Count of data check errors 


72-75 


48-4B 




Lines marked 


76-79 


4C-4F 




Total lines read (CCW chains executed) 


80 


50 



1 
2 


Error indicators: 

l=EOP 

1= Lost reference mark indicator 

1= Late stacker selection 






3 

4 
5 
6 

7 


1= Non-recovery error 
1= Equipment check 
1= Wrong length record 
1= Hopper empty 
1= Data check 


81 


51 




1 


LIOCS switches: 
1= First time 
1=2 I/O areas 



I 



DTFOR (....Cont'd) 



Bytes 


Bits 


Function 


Dec 


Hex 


81 
(Cont'd) 




2 
3 

4 
5-7 


l = WORKA=YES 
l = RECFORM=F!XUNB 
l=RECFORM= UNDER 
Not used 




82 


52 




Normal command code 




83 


53 




Control command code 




84-87 


54-57 




IOAREA2 address 




88-95 


58-5F 




Read CCW 




96-103 


60-67 




Go to next line CCW 




104-111 


68-6F 




Control CCW 




112-115 


70-73 




EOF address 




116-119 


74-77 




Correction exit address 




120-123 


78-7B 




lOAREAl address 




124-127 


7C-7F 




DCA(&BLKS-1) 




128-129 


80-81 




SR 13,&RECS 




130-131 


82-83 




LR&RECS,13 




132-133 


84-85 




LR &10R,13 




134-135 


86-87 




Sense 





Byl 


es 


Bits 


Function 


Dec 


Hex 


-5 


00-05 




CCB Indicators 


6 -7 


06-07 




Logical class and unit numbers (primary If DUAL addressing) 


8 


08 




Zero 


9 -n 


09-OB 




CCW address 


12-15 


OC-OF 




Zeros 


16 
17-19 


10 
11-13 


0-1 

2 

3 

4 

5-7 


Not used 

COBOL open; Ignore option 

Not used 

DTF table address conctants relocated by OPENR 

Not used 

Address of logic module 


20 


14 




DTF type= X'OB' 


21 


15 



1 
2 
3 

4 
5 
6 

7 


Logic module option switches: 

User disengage 0= off; l=on 

Program sort mode 0=no; l=yes 

First time switch (after engage) 0= no; 1= yes 

AddressIng=DUAL 0=no; l=yes 

Waiting 0=no; l=yes 

Read logic indicator 0=no; l=yes 

Not used 

Supervisor initial read (after open) 0=no; l=yes 


11-19 


16-lD 




Symbolic filename 


30 


IE 





Open/Close switch: 
0= closed; l=open 


31-33 


lF-21 




Open/Close option switches 


34-35 


22-23 




Logic module option switches 


36-39 


24-27 




Error Information status 


40-41 


28-29 




Length of DTF table 


42-43 


2A-2B 




Device type indicator 


44-45 


2C-2D 




Record type 


46-49 


2E-31 




Reserved for future use 


50-51 


32-33 




I/O register 


52-55 


34-37 




End-of-file address 


56-59 


38-3B 




IOAREA2/1 address 


60-63 


3C-3F 




Document buffer size 


64-65 


40-41 




Blocking factor/Number of buffers 


66-67 


42-43 




I/O area size 


68-71 


44-47 




Record length 


71-76 


48-4C 




Sense Information 



I 



DTFMR (....Cont'd) 



By 
Dec 


Hex 


Bifs 


Function 


T7 


4D 




Supervisor switch 


7^-79 


4E-4F 




Logical class and unit numbers (secondary, for DUAL 
addressing only) 


80-81 


50-51 




Register alignment bytes 


82-83 


52-53 




Logical class and unit numbers (primary, for DUAL 
addressing) 


84-87 


54-57 




Document buffer size 


88 


58 




Command code (4C) 


89-91 


59-5B 




Address of last byte of first document buffer 


92 


5C 




Command code (4C) 


93-95 


5D-5F 




Address of last byte of last document buffer 


96-99 


60-63 




Stacker select routine address 


100-103 


64-67 




Address of stacker select CCW chain 


104-107 


68-6B 




Current buffer address pointer (Supervisor) 


108-111 


6C-6F 




Supervisor count 


112-113 


70-71 




Number of buffers minus 7 


114-115 


72-73 




Message indicator 


116-119 


74-77 




ERROPT routine address 


120-121 


78-79 




Logical class and unit numbers (secondary, for DUAL 
addressing only) 


122-123 


7A-7B 




Reserved for future use 


124-127 


7C-7F 




Address of lost buffer given to user 


128-131 


80-83 




Address of first byte of last buffer 


132-139 


84-8B 




Channel status word (CSW) 


140-143 


8C-8F 




Address of active GET record 


144-147 


90-93 




GET counter 


148-159 


94-9F 




Reserved for future use 


For single addressing 


160-167 


A0-A7 




CCW - Engage 


168-175 


A8-AF 




CCW - Read 


176-183 


B0-B7 




CCW - Sense 


184-191 


B8-BF 




CCW - NOP 


192-199 


C0-C7 




CCW - Stacker select 


200-207 


C8-CF 




CCW - TIC 


208-215 


D0-D7 




CCW - Control 


216-223 


D8-DF 




CCW - BN 



DTFMR (....Cont'd) 



Bytes 


Bits 


Function 


Dec 


Hex 


224-231 


E0-E7 




CCW - Read 


232-239 


E8-EF 




CCW - Sense 


240-247 


F0-F7 




CCW - Disengage 


For DUAL Address Adapter | 


160-167 


A0-A7 




CCW - Engage 


168-175 


A8-AF 




CCW - Read buffer 1 


176-183 


B0-B7 




CCW - Sense 


184-191 


B8-BF 




CCW - NOP 


192-199 


C0-C7 




CCW - Read buffer 2 


200-207 


C8-CF 




CCW - MOD Sense 


208-215 


D0-D7 




CCW - Read buffer 1 


216-223 


D8-DF 




CCW - MOD Sense 


224-231 


E0-E7 




CCW - TIC to NOP 


232-239 


E8-EF 




CCW - NOP 


240-247 


F0-F7 




CCW - MOD CTL 


248-255 


F8-FF 




CCW - Stacker select 


256-263 


100-107 




CCW - MOD Sense 



DTFMT (Data Files) 



Bytes 


Bits 


Contents* 


Function 


Record* 
Format 


Dec 


Hex 


-15 


00-OF 






CCB 




8 


08 




Input: X'OO'- 

X'63' 
Output: X'OO'- 

X'04' 
(variable) 
X'OO' (undefinec 


Buffer offset length, ASCII 
) 




16 


10 




1 
2 
3 
4 

5 




First time entered MTMOD for a 
file 

Not used 

COBOL open; ignore option 
American National Standard COBOL 
DTF table address constants reloca- 
ted by OPENR 
1 = spanned records 








6 




l=ASCII-0= EBCDIC 


V-V,S 






7 




ASCII input: 1= Length check 
ASCII output: 1= Buffer offset length 
length= 4 


V 
V 


17-19 


11-13 






Address of logic module 




20 


14 




X'll' 
X'12' 
X'13' 
X'14' 


Nonstandard or unlabeled 
Standard labeled, output 
Standard labeled, input, backwards 
Standard labeled, input, forwards 




21 


15 




1 
2 




First time switch: 

l = not first-time entry 

0= first-time entry 

1= blocked 

0= unblocked 

1 = 2 I/O area's 

0= 1 I/O area 








3 




l=workarea 
0= no workarea 
O=workarea, spanned 


F,U,V 
F,U,V 
S 






4 




1= input 
0= output 








5 




1= backwards 
0= forwards 








6 




1= checkpoint 
0= no checkpoint 








7 




1=TRUNC required during Close 




22-29 


16-lD 






Symbolic filename 




30 


IE 






Same os command code in CCW; 
(X'Or, X'02' or X'OC) 




31 


IF 


0-4 




Bits 0-4 are used as displacements by 
OPEN to determine the location of 
variable fields of the DTF. 





DTFMT (Data Files) (....Cont'd) 



Bytes 


Bits 


Contents * 


Function 


Record 
Format 


Dec 


Hex 


31 


IF 




B'OlllO' 


Input 


F 


(Cont'd) 






B'OllOO- 


Output 


F 








BMOOOr 


Input 


V 








B'Onil' 


Output 


V 








B'oiior 


Input 


U 








B'oioir 


Output 


U 






5 




l=Tape label information included 
in DTF (see bytes 88-95) 
0=Tape label information not inclu- 
ded in DTF 








6 




Used by COBOL 








7 




1= Header label and EOV informatior 
wanted 

0= No header label and EOV infor- 
mation wanted 




32 


20 




1 
2 
3 

4 

5 
6 

7 




Standard labels: l = yes; 0= no 

Labels: 1= nonstandard; 0= unlabeled 

Rewind unload: l = yes;0=no 

Rewind option: l=no rewind; 

0= rewind 

Drive direction: 1= backwards; 

0= forwards 

User label address: l=yes; 0= no 

Tapemark option: 1= no; 0= yes 

EOF-EOV switch (used by IBM 

SORT): l=yes;0=no 




33-35 


21-23 






User label routine address 




36 


24 



1 

2 
3 
4 

5 




DTFPH: l=yes; 0= no 

COBOL indicator: l=yes; 0= no 

File type: 1= input; 0= output 

FEOV switch: l=yes;0=no 

EOF-EOV switch (output): l=EOF 

0=EOV 

Open indicator: 1 = open; 0= closed 








6 




1= variable or spanned records 


V,S 






7 




1= undefined records 


U 


37-39 


25-27 






EOF address 




40-43 


28-2B 






Block count 




44-47* 


2C-2F 




BXH 11,12, 
24(15) 


Forward 


F 








BXLE 11,12 


Backward 


F 








24(15) 












L &VARBLD, 


If VARBLD parameter is used 


V 








DEBLOCKER 












NOP 0(0) 




S 








DCF'O' 


DEBLOCKERl 


U 



I 



DTFMT (Data Fries) (....Cont'd) 



Byt 


es 


Bits 


Contents* 


Function 


Record 
Format 


Dec 


Hex 


48-51 


30-33 




LA 14,1(14) 




F,V,S 








BCTR 14,0 + 


Backward 


F,V,S 








NOPRO 












L &RECSIZE, 


If RECSIZE given 


u 








DEBLOCKERl 












NOP 0(0) 


For input if not NOP 


u 


52-55 


34-37 




L &IOREG, 
DEBLOCKERl 


If iOREG specified 


F 








L &IOREG, 


If IOREG specified 


V 








DEB LOCK ER5 












LEIOREG, 


If IOREG specified 


u 








DEBLOCKER2 












NOP 0(0) 


If no IOREG 










L &RECSIZE, 


If spanned input 


S 








UFVSREC 












ST &RECSIZE, 


If spanned output 


S 








UFVSREC 






56-63 


38-3F 






ccw 




64-67 


40-43 




DCAdOAREAl) 
DC AdOAREAl 
+BLKSIZE-1) 
DC A(IOAREA2) 
DC A(!OAREA2 
+ BLKSIZE-1) 


One I/O area 

One I/O area, read backward 

Two I/O area 's 

Two I/O area's, read backward 




68-71 


44-47 




DC F'O' 


Input 


F 








DC AdOAREAl 


Input backward: DEBLOCKERl 


F 








+BLKSIZE- 












RECSIZE) 












DC A(IOAREAl) 


1 I/O area, output: DEBLOCKERl 


F 








DC A(10AREA2) 


2 I/O area's, output: DEBLOCKERl 


F 








DCA(BLKSIZE) 


DEBLOCKERl: EBCDIC 


V,S 








DC AdOAREAl ) 


1 I/O area: DEB LOCK ER2 


u 








DCA(IOAREA2) 


2 I/O area's: DEB LOCK ER2 


u 


72-75 


48-4B 




DCF'RECSIZE' 


Forward: DEB LOCK ER2 


F 








DCF'-RECSIZE' 


Backward: DEBLOCKER2 


F 








DC A(IOAREAl) 


1 I/O area: DEBLOCKER2 


V,S 








DC A(IOAREA2) 


2 I/O area's: DEBLOCKER2 


v,s 








LA 14,1(14) 


Forward 


u 








BCTR 14,0 + 


Backward 


u 








NOPRO 






76-79 


4C-4F 




DC F'O' 


Input forward: DEBLOCKER3 


F 








DC A(IOAREAl 


Input backwards: DEBLOCKER3 


F 








+BLKSIZE - 












RECSIZE) 












DC A(IOAREAl 


Output, 1 I/O area: DEBLOCKER3 


F 








+BLKSIZE-1) 












DC A(IOAREA2 


Output, 2 I/O area's: DEBLOCKER3 


F 








+BLKSIZE-1) 







DTFMT (Data Files) (....Cont'd) 



Bytes 


Bits 


Contents 


Function 


Recori^ 
Format 


Dec 


Hex 


76-79 






DCF'O' 


DEBLOCKER3 


v,s 


(Cont'd) 






DCY(BLKSIZE) 


(Bytes 76-77 only) 


u 








DCY(BLKSIZE 
-1) 


(Bytes 78-79 only) 


U 


80-83 


50-53 




DC Y(BLKSiZE) 
+ Y(BLKSIZE-1) 


Forward 


F 








DC &(BLKSIZE) 


Backward 


F 








+Y(BLKSIZE+1) 












DCF'O' 


DEBLOCKER4 


v,s 








LR 12,RECS1ZE 


(Bytes 80-81 only) 


U 








DC H'O- 


(Bytes 82-83 only) 


U 


84-87 


54-57 




DC Y(RECSiZE 

-1) 

DC2X'00' 


(Bytes 84-85) 


F 








(Bytes 86-87) Output, Standard lobek 


F 








DC A(iOAREAl 


1 I/O area: DEBLOCKER 5, EBCDIC 


v,s 








44) 












DC A(IOAREA2 


2 I/O area's: DEBLOCKER 5, EBCDIC 


V,S 








+4) 












DC A(IOAREAl 


1 I/O area: DEBLOCKER5, ASCII 


V 








+BLFOFF) 












DC A(IOAREA2 


2 I/O area's: DEB LOCKERS, ASCII 


V 








+BUFOFF) 












DC 2X'00' 


(Bytes 84-85 output only) 
Standard labels; reserved for OPEN 


F,U 








B 28(15) 


Input only, ERROPT= omitted 


U 








B 24(15) 


Input only, ERROPT= SKIP 


U 








B 28(15) 


Input only, ERROPT= IGNORE 


U 








DC A(ERROPT) 


Input only, ERROPT= ADDRESS 


U 


88-91 


58- 5B 




DC A(WLRERR) 
B 24(15) 

B 28(15) 


Input only, WLRERR= ADDRESS 

Input only, WLRERR omitted and 

ERROPT=SKiP 

Input only, WLRERR omitted and 

ERROPT= IGNORE or omitted 










DC 2X'00' 


Output only, standard labels (bytes 
88-89), reserved for OPEN 


-n 








DC A(ERROPT) 


Input only, WLRERR omitted and 
ERROPT= ADDRESS 


I 


90-95 


5A-5F 




DC 6X'00' 


File serial number. Standard labels. 
Output only 


1 


92-95 


5C-5F 




DC A(ERROPT) 


Input only, ERROPT= ADDRESS 
Output, nonstand'-rd labels only. 
ERROPT= ADDRESS 


I 








B 28(15) 


Input only, ERROPT= omitted 


i_ 








B 24(15) 


Input only, ERROPT=SKIP 










B 28(15) 


Input only, ERROPT= IGNORE 




96-99 


60-63 




DC 4X'00' 


Volume sequence number. Standard 
labels, output only 




96-97 


60-61 




DC 2X'00' 


Standard labels, input only, reserved 
for OPEN 





I 



DTFMT (Data Files) (. . . .Cont'd) 



Bytes 


Bits 


Contents* 


Function 


Record* 
Format 


Dec 


Hex 


98-103 


62-67 




DC 6X'00' 


File serial number. Standard labels, 
input only. 


■n 


100-103 


64-67 




DC 4X'00' 


File sequence number. Standard 
labels, output only 


f 

^ 


104-107 


68-6B 




DC 4X'00' 
DC A(ERROPT) 


Volume sequence number. Standard 
labels, input only 
Output only. Standard labels only. 
ERROPT= ADDRESS 




108-111 


6C-6F 




DC4X'00' 


File sequence number. Standard 
label, input only 




88-91 


58-5B 




DCF'O' 


DEBLOCKER6 




92-95 


5C-5F 




i:CA(ERROPT) 


Output only. Nonstandard labels 
only. ERROPT= ADDRESS 




92-93 


5C-5D 




DCY(BLKSIZE) 

DCY(BIJ<SIZE 

-4) 

DCY(BLKSIZE 

-BUFOFF) 


Input only 

Output only: EBCDIC 










Output only: ASCII 


(Vonly) 


94-95 


5E-5F 




DCY(BIJ<SIZE 
-1) 






96-97 


60-61 




DCY(RECSIZE 

-1) 

DC H'O' 




? 


98-99 


62-63 




Input only: Residual count 


< 

q' 


100-103 


64-67 




DC A(WLRERR) 
B 24(15) 

B 32(15) 


Input only, WLRERR= ADDRESS 

Input only, WLRERR= omitted and 

ERROPT=SKIP 

Input only, WLRERR= omitted and 

ERROPT= IGNORE or omitted 


a- 

S 
1 


100-101 


64-65 




DC 2X'00' 


Output only. Standard labels, reser- 
ved for OPEN 




104-107 


68-6B 




DC A(ERROPT) 
B 28(15) 
B 24(15) 
B 28(15) 
DC A(ERROPT) 


Input only, ERROPT= ADDRESS 
Input only, ERROPT= omitted 
Input only, ERROPT= SKIP 
Input only, ERROPT= IGNORE 
Output, Nonstandard labels only 
(version 3 onward); ERROPT=ADDREf 


s 


108-111 


6C-6F 




DC 4X'00' 


Volume sequence number; Standard 
labels, output only 




108-109 


6C-6D 




DC 2X'00' 


Standard labels, input only; Reservec 
for OPEN 




110-115 


6E-73 




DC 6X'00' 


File serial number; Standard labels, 
input only 




112-115 


70-73 




DC 4X'00' 


File sequence number; Standard lobe 
output only 


'' 



DTFMT (Data Files) (....Cont'd) 



Bytes 


Bits 


1 

Contents* 


Function 


Record' 
Format 


Dec 


Hex 


116-119 


74-77 




DCA(ERROPT) 


Output only, ERROPT= ADDRESS, 
Standard labels only 


1? 


116-119 


74-77 




DC4X'00' 


Volume sequence number; Standard 
labels, input only 


11 


120-123 


78-7B 




DC 4X'00' 


File sequence number; Standard 
labels, input only 


li 


86-91 
88-91 


56-5B 
58-5B 




DC 6X'00' 
DC A(WLRERR) 


File serial number; Standard labels, 

output only 

Input only; WLRERR= ADDRESS 










B 24(15) 
B 28(15) 
DC A(ERROPT) 


Input only; WLRERR= omitted and 

ERROPT=SKIP 

Input only; WLRERR= omitted and 

ERROPT= IGNORE or omitted 

Input only; WLRERR= omitted and 

ERROPT= ADDRESS. Output only; 

nonstandard labels, ERROPT= ADDRE 


ss ^ 


92-95 


5C-5F 




DC 4X'00' 


Volume sequence number; Standard 
labels, output only 


§ 


92-93 


5C-5D 




DC 2X'00' 


Standard labels; input only, Reserved 
for OPEN 


5, 

1 


94-99 


5E-63 




DC 6X'00' 


File serial number; Standard labels, 
input only 


8 


96-99 


60-63 




DC 4X'00' 


File sequence number; Standard 
labels, output only 


o 


100-103 


64-67 




DC 4X'00' 


Volume sequence number; Standard 
labels, input only 




100-103 


64-67 




DC A(ERROPT) 


Output only; Standard labels only, 
ERROPT= ADDRESS 




100-103 


64-67 




DC 4X'00' 


Volume sequence number; Standard 
labels, output only 




104-107 


68-6B 




DC 4X'00' 


File sequence number; Standard 
labels, input only 




100-103 


64-67 




DC A(WLRERR) 
B 24(15) 

B 32(15) 


Input only; WLRERR= ADDRESS 
Input only; WLRERR= omitted and 
ERROPT= SKIP 

Input only; WLRERR= omitted and 
ERROPT= IGNORE or omitted 


-T1 

1 


100-101 


64-65 




DC2X'00' 


Output only; Standard labels, 
reserved for OPEN 


O 
Q. 

S 


102-107 


66-68 




File serial 
number 


Standard labels, output only 


1 

o 


100-103 


64-67 




DC 4X'00' 


Output only; ERROPT= ADDRESS 
Nonstandard labels only 


^ 



I 



DTFMT (Data Fries) (....Cont'd) 



Bytes 


Bits 


Contents* 


Function 


Record* 
Format 


Dec 


Hex 


100-123 


64-7B 




DC 24X'00' 


Output only; ERROPT= omitted, 
nonstandard labels 




104-107 


68-6B 




DC A(ERROPT) 
B 24(15) 
B 24(15) 
B 28(15) 


Input only; ERROPT= ADDRESS 
Input only; ERROPT= omitted 
Input only; ERROPT= SKIP 
Input only; ERROPT= IGNORE 




104-107 


68-6B 




DC A(ERROPT) 


Output only; ERROPT= ADDRESS, 
nonstandard labels 




108-123 


6C-7B 




DC 16X'00' 


Output only; ERROPT= ADDRESS, 
nonstandard labels 




108-111 


6C-6F 




Volume sequen- 
ce number 


Standard labels, output only 




112-115 


70-73 




File sequence 
number 


Standard labels, output only 




116-119 


74-77 




DC A(ERROPT) 


Output only, ERROPT= ADDRESS, 
standard labels 




120-123 


78-7B 




DC4X'00' 


Output only, ERROPT= ADDRESS, 
standard labels 


R 


108-123 


6C-7B 




DC 16X'00' 


Input only, nonstandard labels 


1 


108-109 


6C-6D 




DC 2X'00' 


Standard labels, input only, reserved 
for OPEN 


Q. 


110-115 


6E-73 




File serial 
number 


Standard labels, input only 


i 


116-119 


74-77 




Volume sequen- 
ce number 


Standard labels, input only 


^ 


120-123 


78-7B 




File sequence 
number 


Standard labels, input only 




124-127 


7C-7F 




DCF'O' 


Full word for loading and storing 
USER RECSIZE: IJFVSREC 




128 


80 



1 

2 
3 
4 
5 

6 

7 


DC X'OO' 


IJFVSFLG 
Sign bit, not used 
Skip to first segment 
First segment 

Segment out of sequence, input only 
Read back for EOV, output only 
File reversed for logical spacing; 
input CNTRL only; Trunc issued, out- 
put only 

User Trunc issued, output only 
Multi segment, output only; Skip Ge 
segment, input CNTRL only 




129-131 


81-83 




DC 3X'00' 


Pointer within WORKA 





See Notes on next page 



DTFMT (Data Files) (. . . .Cont'd) 



* The format of the tape data file DTF Is different starting at byte 44. 

The location Indicated by the numbers In the left hand column can contain only 
one of the factors listed under Contents . 

The factor used for any given DTF table Is determined by whether the file record 
format is fixed, variable or undefined, and by other DTF parameters as Indicated. 
A blank in the record column Indicates that the contents apply to all record types. 

• Record Format explanation 

F = Fixed Record 

V = Variable 

U = Undefined 

S = Spanned (variable format superset) 

The deblockers are scratch areas used by the modules to save data from one GET/ 
PUT macro instruction to another. In the text and listings, they are referred to by 
the names DEBLOCKERl to 6. These are not labels; they are comments used to 
make It easier to follow the listings. 



I 



DTFMT (Workfiles) 



Bytes 


Bits 


Function 


Dec 


Hex 


-15 


00-OF 




CCB 


16 


10 


0-1 

2 

3 

4 

5-7 


Not used 

COBOL open; ignore option 

1= VOLl label is at user specified density 

1= DTF table address constants relocated by OPENR 

Not used 


17-19 


11-13 




Address of logic module 


20 


14 




DTFtype=X'10' 


21 


15 



1 
2 
3 

4 
5 
6 

7 


1= No rewind 

1= Rewind unload 

l=Workfile 

1= Read backward 

1 = Write 

l=POlNTW 

Not used 

1 = Forward-space file before next operation 


22-23 


16-17 




Not used 


24-25 


18-19 




Record length 


26-27 


lA-lB 




Maximum BLKSIZE 


28 


IC 




Read command code (X'02' for read forward; X'OC for read 
backward) 


29-31 


ID-IF 




EOF address 


32-39 


20-27 




COV 


40-43 


28-2B 




Block count, initialized 00000000 for read forward, 00400000 
for read backward 


44 


2C 



1 

2 
3 
4-7 


1= Error routine 

1= Ignore 

Not used 

1= Record fixed unblocked 

Not used 


45-47 


2D-2F 




DC A(ERROPT) Address of error routine 



DTFSD (Data Files) 








DTP Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


&Filename 


-15 


00-OF 




Command Control Block (CCB) 




16 


10 



1 
2 
3 
4 
5 

6 

7 


1= Dequeue old volume extents 

1= Dummy OPEN to obtain extents from label track 

1= File assigned MGN' (COBOL) 

1= Track hold option specified 

1= DTF relocated by OPENR 

1= Input trailer lobe Is to be processed at close time 

(COBOL only) 
1= Spanned processing 
1= COBOL end-of-extent option specified 




17-19 


11-13 




Address of logic module 




20 


14 




DTF type for OPEN/CLOSE (X'20'= sequential 
access DASD files) 




21 


15 




1 

2 
3 
4 
5 
6 
7 


1= Not used 

1= Blocked file 

1 = Work file 

1= Workarea specified 

1= Not a Version 1 type table 

l=Open; 0= closed 

1= Input; 0= output 

1= User labels specified 




22-28 


16-lC 




Filename (DTF name) 




29 


ID 




Device type code: 

X'00'=2311 Note: 

X'Or= 2314,2319 In previous versions, last 
X'04'= 3330-1,-2 byte of filename contains 
X'05 '= 3330-11 ^^^'=« ^yP^ '^o^^ 
X'07'= 3350 
X'08'= 3340 general 
X'09'= 3340 35MB 
X'OA'= 3340 70MB 




30-35 


lE-23 




Address of Format I label in VTOC (BCCHHR) 




36-37 


24-25 




Volume sequence number 




38 


26 




1 
2 
3 
4 
5 
6 
7 


1 
2 
3 

4 
5 


Open communication byte: 
Input file 

1= No more extents 

1= Update file 

1= Process trailer labels 

1= Exit to user's EOF routine 

1= Next extent on new volume 

1= Return to close routine 

1= Process header labels 

1= Extent switch 

Output file 

l=No more extents 

1= Extents needed at close time 

1= Process trailer labels 

1= Process header labels 

1= Next extent on new volume 

1= Extents entered via console 



I 



DTFSD (Data Files) (....Cont'd) 



DTP Assembly 


Bytes 


Bits 


Function 


Label 


Dec 


Hex 








38 






Output file (Cont'd) 




(Cont'd) 


6 


1= Process trailer labels at close 








7 


1= Check extent for minimum of 2 tracks 




39 


27 




1 
0-7 


1= Extent bypassed before file is opened (input 

only) 

1= FEOVD has been issued (input only) 

Sequence number of current extent opened 

(Output only) 




40 


28 




Sequence number of last extent opened 




41-43 


29-2B 




Address of user's label routine 




44 


2C 



1 
2 

3^ 

7 


not used 

1= Device supports RPS 

1= Version 3 DTF 

not used 

1= DTF has been extended into the partition 

virtual area 




45-47 


2D-2F 




Address of lOAREAl 




48-51 


30-33 




CCHH address of user's label track (X'80000000') 


&Filename.S 


52-53 


34-35 




Lower head limit (HH) 




54-57 


36-39 




Extent upper limit (CCHH) 




58-59 


3A-3B 




Seek address (BB) : 
X'OOOO' if a disk device 




60-63 


3C-3f 




Search argument (CCHH) 




64 


40 




Record number 




65-67 


41-43 




EOF address if input file ; Key length and data 
length if output file 




68-71 


44-47 




CCHH control field : 
CCHH=x'OOC80009' if 2311 - type! 
CCHH=X'O0C80013' if 2314 or 2319 - type 1 
CCHH=X'01940012' if 3330 - type 1 
CCHH=X'03280012' if 3330-11 - type 1 
CCHH=X'015C000B' if 3340 35MB 
CCHH=X '02B8000B • if 3340 70MB 
CCHH=X'022B001D' if 3350 - type 1 

where nn= current upper head number 




72 


48 




Number of records per track (input) or number of 
records per track - minus one (output) 




73 


49 




1 

2 
3 

4 


Switch byte used by the logic modules for various 
switching purposes. Functions indicated are for 
the ON condition(l) of the respective bit. 

Fixed length Record Modules 

Not first entry after Open (INPLTT and UPDATE) 

Not first write after Open (OUTPUT) 

Short record (INPUT and UPDATE without 

truncation) 

Partial block written (OUTPUT) 

ERROPT= SKIP (INPUT); TRUNC- YES (OUTPUT) 

End-of-file record written (OUTPUT) 

End of extent (UPDATE) 



DTFSD (Data Files) (....Cont'd) 



DTP Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




73 






Fixed length Record Modules (Cont'd) 








5 
6 

7 


1 

2 

3 
4 
5 

6 

7 


1 

2 
3 
4 
5 
6 
7 


Truncation not specified (used by OPEN routines) 
Write block of records (UPDATE) 
End of file (UPDATE) 

Variable length Record Modules 

Not first entry after OPEN (INPUT and UPDATE) 
Write record (OUTPUT) 

Wrong length record (INPUT); TRUNC=YES 
(OUTPUT); Second GET operation performed (UP- 
DATE) 

Return to close routine (OUTPUT) 
Update specified (UPDATE) 
Not first entry after OPEN (OUTPUT) 
New extent required by CLOSE 
Capacity of I/O area exceeded (OUTPUT) 
Second GET required (UPDATE) 
Not first read (INPUT) 
Second GET issued (UPDATE) 
Unnecessary to read (INPUT) 
Track capacity exceeded (OUTPUT) 
Save record count (UPDATE) 

Undefined length Record Modules 

Not first entry after OPEN (ALL modules) 

Save record count (UPDATE) 

Return to close routine (OUTPUT) 

Second GET Issued (UPDATE) 

Not used 

PUT command issued (UPDATE) 

End of file reached (UPDATE) 

Multi-track operation (UPDATE) 




74-75 


4A-4B 




Block size minus 1 




76-80 


4C-50 




CCHHR= Extent lower limit and record number. 
Field is used as a search argument bucket by the 
logic modules 




81 


51 


1 


1= FEOVD has been issued (output only) 




81-83 


51-53 




Address of user wrong-length record routine if 
input file; Track capacity counter if output file 




84-87 


54-57 




Instruction to load user's register lOREG. 
(Note: This field is a NOP unless blocked records 
are processed in one I/O area, or two I/O areas 
are specified and records are processed in the 
I/O areas) 




88-91 


58-5B 




Address of current available input/output area 




92-95 


5C-5F 




Logical record size 




96-99 


60-63 ■ 




Address of end of input/output area 



I 



DTFSD (Dafg Files) (. . . .Cont'd) 



DTP Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




100 


64 



1 
2 
3 
4 
5 

6 

7 


Logical indicators: 

l=ERROPT= address 

1= ERROPT= IGNORE 

1= ERROPT= SKIP 

1=VERIFY=YES 

1 = 2 I/O areas 

1 = WLRERR= address (fixed length and variable 

records) 
1= Output file (undefined length records) 
1 = Fixed-length records 
0= Variable or undefined length records 
Control parameter specified 




101-103 


65-67 




Address of user's read error routine 




104-111 


68-6F 




SeekCCW 




112-119 


70-77 




Search ID. Equal CCW 




120-127 


78-7F 




TICCCW 




128-135 


80-87 




Read/Write Data CCW 



This is the end of the common portion of the DTFSD table. The following sections are a 
added depending on the parameters specified in the operand of the DTFSD macro instruction. 



DTP Assembly 
Label 


Bytes 


Bits 


Function 


Record 
Format 


Dec 1 Hex 


If RECFORM=FIXBLK and TRUNCS= YES 


-n 

1 

i 

3. 
5* 

a" 




136-143 
144-151 


88-8P 
90-97 




Read count CCW 
Count field input area 


If CONTROL= YES, the following section is added 


152-167 
168-175 


98-A7 
A8-AF 




Control CCB 
Control CCW 


IfUPDATE=YES 




136-143 
144-151 
152-159 


88-8F 
90-97 
98-9F 




Search ID Equal CCW 

TICCCW 

Verify CCW 


If CONTROL= YES, the following section is added 


160-175 
176-183 


AO-AF 
B0-B7 




Control CCB 
Control CCW 


If RECPORM=FIXBLK, TRUNCS- YES and UPDATE=YES 




136-143 
144-151 


88-8F 
90-97 




Read Count CCW 
Search ID Equal CCW 



DTFSD (Data Files) (....Cont'd) 



DTP Assembly 
Label 


Bytes 


Bits 


Function 


Record 
Format 


Dec ( Hex 


If RECFORM=FIXBLK, TRUNCS= YES and UPDATE=YES (Cont'd) 


-n 
I 

i 

8" 




152-159 

160-167 
168-175 


98-9F 

A0-A7 
A8-AF 




TIC CCW (Bytes 158-159 contain saved 
block length if two files are using same 
logic module) 

Verify CCW 

Count field input area 


If CONTROL= YES, the following section is added 


176-191 
192-199 


BO-BF 
C0-C7 




Control CCB 
Control CCW 


If TRUNCS or UPDATE are not specified, no additions ore made to the DTFSD 
table except when CONTROL= YES is specified, the following section is added. 




136-151 
152-159 


88-97 
98-9F 




Control CCB 
Control CCW 




136-143 
144-151 
152-159 


88-8F 
90-97 
98-9F 




Search ID Equal CCW 
TIC CCW 
Verify CCW 


-n 
x 

s. 

1 

C 

g 

c 

f 


If CONTROL is not specified 


160-163 


A0-A3 




End-of-extent routine address (primarily 
used by COBOL compiler) 


If CONTROL=YES 


160-175 
176-183 
184-187 


AO-AF 
B0-B7 
B8-BB 




Control CCB 

Control CCW 

End-of extent routine address (primarily 
used by COBOL compiler) 




136-143 


88-8F 




Read count CCW 


-i § ^ 

III 

O O 3 


If UPDATE is not specified: 




144-151 


90-97 




Count field input area 


If CONTROL=YES* 


152-167 
168-175 
176-179 
180-183 


98-A7 
A8-AF 
B0-B3 
B4-B7 




Control CCB 
Control CCW 
Logical record length 
RX type instruction 



* These bytes are always generated when spanned processing is specified 



DTFSD (Data Files) (....Cont'd) 



DTP Assembly 
Label 


Bytes 


Bits 


Function 


Record 
Format 


Dec 1 Hex 


If UPDATE 


is not specified: (Cont'd) 




III 






If CONTROL= YES (Cont'd) 


184 


B8 




1 

2 

3-7 


Not used 

1= Skip segment 

1= Spanned first time 

Not used 






185-187 


B9-BB 




Pointer in logical record 




if UPDATE= 


= YES: 




h 






144-151 


90-97 




Search ID Equal CCW 






152-159 


98-9F 




TICCCW 


'4 






160-167 


A0-A7 




Verify CCW 


r^ 






168-175 


A8-AF 




Count field input area 


n 






176-183 


B0-B7 




Count field save area if one I/O area 


8 s" 






184-191 


B8-BF 




Count field save area if two I/O areas 


5.S 


If CONTROL=YES* 




192-207 


CO-CF 




Control CCB 






208-215 


D0-D7 




Control CCW 








216-219 


D8-DB 




Logical record length 








220-223 


DC-DF 




RX type instruction 








224 


EO 



1 
2 
3 
4 
5 
6 
7 


Not used 

1= Skip segment 

1= Spanned first time 

1= Null segment 

1= Spanned PUT return 

Not used 

Not used 

1= No update 


<: 

8 i 

t} 

2 2 






225-227 


E1-E3 




Pointer in logical record 


i. 






228-235 


E4-EB 




Count save area 








236-239 


EC-EF 




Extent status save area 








136-143 


88-8F 




Search ID Equal CCW 


<: 






144-151 


90-97 




TICCCW 


R 






152-159 


98-9F 




Verify CCW 


o HI 
5. «^ 






160-163 


A0-A3 




Space remaining in output area 








164-165 


A4-A5 




Track capacity 


if 






166-169 


A6-A9 




Instruction to load user's register VARBLD 
(If VARBLD is not specified, instruction 
is NO-OP) 


^ 



These bytes are always generated when spanned processing is specified 



DTFSD (Data Files) (....Conf'd) 



DTP Assembly 
Label 


Bytes 


Bits 


Function 


Record 
Format 


Dec 1 Hex 




If CONTROL^ YES * 


f 
o ^ 


170-172 


AA-AC 




Not used 




173-175 


AD-AF 




End-of-extent routine address (primarily 
used by COBOL compiler) 


ii 




176-191 


BO-BF 




Control CCB 






192-199 


C0-C7 




Control CCW 


i 




200-203 


C8-CB 




Logical record length 






204-207 


CC-CF 




RX type instruction 






208 


DO 




1 

2 
3 
4 
5 
6 
7 


Not used 

Not used 

1= Leading segment 

1= Output block truncated 

1= End of track 

1= Track truncated 

1= Save count 

1= Volume spanned 


8 1 

cL " 
o 5- 

2 i 




209-211 


D1-D3 




Pointer in logical record 


S. 




212-219 


D4-DB 




Count save area 






220-223 


DC-DF 




Extent status save area 






136-143 


88-8F 




Search ID Equal CCW 






144-151 


90-97 




TIC CCW 






152-159 


98-9F 




Verify CCW 




160-161 


AO-Al 




Track capacity 


II 

ii 


If CONTROL=YES 


162-164 


A2-A4 




Not used 




164-167 


A4-A7 




End-of-extent routine address (primarily 
used by COBOL compiler) 






168-183 


A8-B7 




Control CCB 






184-191 


B8-BF 




Control CCW 





I 



These bytes are always generated when spanned processing Is specified 



DTFSD (Workfiles) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


&Filename 


0-15 


00-OF 




Command Control Block (CCB) 




16 


10 


0-1 

2 

3 

4 

5-7 


Not used 

1= File assigned 'IGN' (COBOL) 
1= Track hold option specified 
1= DTF relocated by OPENR 
Not used 




17-19 


11-13 




Address of logic module 




20 


14 




DTF type for OPEN/CLOSE (X'20' = sequential 
access DASD files) 




21 


15 



1 

2 
3 
4 
5 
6 
7 


0= Disk device 

1= CLOSE macro is not to delete Format 1 and 

Format 3 file labels 

1= Work file 

Type of open : T= Point; 0= Normal 

1= Routine entered from close routine 

1= File opened; 0= File closed 

Not used 

1= Re-entry to close routine 




22-28 


16-lC 




Filename (DTF name) 




29 


ID 




Device type Code : 

X'00'=2311 

X'0r=2314, 2319 

X'04^= 3330-1, 2 
X'05'= 3330-11 
X '07 '=3350 
X '08 '=3340 general 
X '00 '=3340 35MB 
X'OA'= 3340 70MB 

Note: In previous versions, last byte of filename 
contains device type code 




30-31 


lE-lF 




Track capacity counter 




32-35 


20-23 




Address of Format 1 label in VTOC (CCHR) 




36 


24 




Extent sequence number 




37 


25 




1 
2 
3 
4 
5 
6 
7 


Open communication byte 

Not used 

1= Device supports RPS 

1= Version 3 DTF 

1= symbolic unit in DTF 

1= next extent on new volume 

1= extent opened 

Not used 

1= DTF has been extended into the partition 

virtual area 




38 


26 




Lower head limit 




39 


27 




Upper head limit 


&Filename.L 


40-41 


28-29 




Record length 




42-45 


2A-2D 




Initial extent lower limit 




46-49 


2E-31 




Current extent lower limit 




50-53 


32-35 




Extent upper limit 



DTFSD (Workflles) (. . . .Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


^filenames 


54-55 


36-37 




Seek address (BB= X'OOOO') 




56-59 


38-3B 




Search address (CCHH) 




60 


3C 




Record number 




61 


3D 



1 
2 
3 
4 
5 
6 
7 


Switch byte used by logic module 

1= First write entry indicator 

1 = Write update indicator 

1= POINTS macro issued 

Not first record of a track (RECFORM= UNDEF) 

1 = Track upper limit reached 

Not used 

1= Check after read/write 

Not used 




62-63 


3E-3F 




Maximum record length 




64 


40 




Verify chain bit 




65-67 


41-43 




Address of user's EOF routine 




68 


44 



1 
2 
3 
4 
5 
6-7 


Logical indicators 

l=ERROPT= address 

1= ERROPT= IGNORE 

1= Fixed-length unblocked records 

1= Verify specified 

l=ERROPT=SKIP 

1= Re-read after read error 

Not used 




69-71 


45-47 




Address of user read/write error routine 




72-143 


48-8F 




CCW chain for work files 




144-151 


90-97 




Input area for Verify CCW and Read Count CCW 



DTF Assembly 
Label 


Module DSECT 
Label 


By 


tes 


Bits 


Function 


Dec 


Hex 


&F!lename 


IJICCB 


0-15 


00-OF 




Command Control Block (CCB) 




UIMOD 


16 


10 




1 
2 
3 
4 
5 
6 
7 


1= Trailer labels 

Used by FREE macro 

1= COBOL Open/Ignore option 

1= Track hold option specified 

1= DTF relocated by OPENR 

Not used 

1- SPNUNB 

Used by CNTRL macro 






17-19 


11-13 




Address of logic module 






20 


14 




DTF type for OPEN/CLOSE 
(X'22'= direct access files) 




IJISWI 


21 


15 




1 
2 

3 

4 
5 

6 

7 


1= Output; 0= Input 

1= Verify option specified 

1= Search multiple track (SRCHM) 

specified 

1= WRITE AFTER or WRITE RZERO 

macro used 

1- IDLOC specified 

1= Undefined; 0=FIXUNB, 

VARUNB or SPNUNB 

1= RELTYPE- DEC 

1= End of file 




IJIFNM 


22-28 


16-lC 




Filename (DTF name) 




IJIDVTP 


29 


ID 




Device type code: X'05'=3330-l 1 
X'00'=2311 X'07'=3350 
X'0r=2314,2319 X'08'=3340 general 

X'09'=3340 35MB 
X*04'=3330-l,-2 X'0A"=3340 70MB 




IJIUNT 


30-31 


lE-lF 




Starting logical unit address of 
the first volume containing the 
data file. This value is supplied 
by the OPEN from EXTENT cards 
(can be initially zero) 




IJIRPS 


32 


20 



1 
2-6 

7 


Not used 

1= Device supports RPS 

Not used 

1= DTF has been extended into 

the partition virtual area 




IJIULB 


33-35 


21-23 




Address of user's label routine 




IJIUXT 


36-39 


24-27 




Address of user's routine for pro- 
cessing EXTENT information 




IJ IRE LPT 


40 


28 




Pointer to relative address area: 
&Filename.P - &Filename 

2 
Address of a 2-byte field in which 




UIERC 


41-43 


29-2B 














IOCS can store the error conditi- 












on or status codes 




IJITST 


44-45 


2C-2D 




Macro code switch for internal use: 

X'0000'= READ ID 

X'OOOr =READ KEY 

X'0002'- WRITE ID 

X'0003'= WRITE KEY 

X'0004'= WRITE RZERO 

X'0005'= WRITE AFTER 



DTFDA (....Cont'd) 



DTF Assembly 
Label 


Mcxlule DSECT 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




IJIBPT 


46-47 


2E-2F 




Pointer to channel program build 
area (&Filename.B) minus 32 




IJICB2 


48-63 


30-3F 




Control seek CCB 


SFilename.Z 


IJiCCW 


64-71 


40-47 




Control Seek CCW for overlap 
seek routine 




IJIXMD 


72-75 


48-4B 




Channel program builder instruc- 
tion: XI 36(2),C'0' 




IJIMSZ 


76-77 


4C-4D 




Maximum data length for FIXUNB 
or UNDEF records; BLKSIZE for 
VARUNB or SPNUNB records 




IJISPT 


78 


4E 




Pointer to READ ID string (File 
name.O); X'OO' if no READ ID 
issued 






79 


4F 




Pointer to READ KEY string (File 
name.l); X'OO' if no READ KEY 
issued 






80 


50 




Pointer to WRITE ID string (File 
name. 2); X'OO' if no WRITE ID 
issued 






81 


51 




Pointer to WRITE KEY string (File 
name. 3); X'OO' if no WRITE KEY 
issued 






82 


52 




Pointer to WRITE RZERO string 
(Filename.4); X'OO' if no WRITE 
RZERO issued 






83 


53 




Pointer to WRITE AFTER string 
(Filename. 5); X'OO' If no WRITE 
AFTER Issued 




IJITRK 


84-85 


54-55 




Track constant: 

2311: H'O' if key length=0 

H'20' If key length/0 

2314/2319: H'O' if key length=0 

H'45' If key lengthy^O 

3330: H'135' if key length^O 

H'19r if key lenqth^^O 

3340: H'167' If key length=0 

H'242' If key length?^ 

3350: H'185' if key length=0 

H'267' if key length^^O 




IJIRIC 


86-87 


56-57 




2311 : H'6r 
2314/2319: H'lOr 
3330 : H'135' 
3340 : H'167' 
3350: H'185' 




IJILAT 


88 


58 



1 
2 
3 
4 


Not used 

1= Wrong-length- record 

1= non data transfer error 

Not used 

1= no room found 



I 



DTFD A (....Cont'd) 



DTF Assembly 
Label 


Module DSEa 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 






88 
(Cont'd) 




5-6 

7 


Not used 

1= Record out of extent area 






89 


59 



1 

2 
3 

4 
5 
6 

7 


1= Data check in count area 

1= Track overrun 

1= End of cylinder 

1= Data check when reading key 

or data 
1= No record found 
1= End of file 
1= End of volume 
Not used 




UILBTK 


90-95 


5A-5F 




Label track address, XBCCHH, 
where X is the volume sequence 
number of the device on which the 
label track is located. 


The following section is included if UNDEF, AFTER 


or RZERO is specified 


SFilenome.L 


IJILST 


96-143 


60-8F 




Basic CCW's to build channel pro- 




IJIVIT 
IJIFRU 


144-183 
184-185 

186-187 


90-B7 
B8-B9 

BA-BB 




Basic CCW's for undefined length 
or formatting macros 
Instruction to give record length 
to user if record length is undefined 
(NOPR if no RECSIZE specified) 
Instruction to get record length 
from user if record length is unde- 
fined. (NOPR if no RECSIZE 
specified) 


&Filename.F 


IJIFLD 


188-192 


BC-CO 




Work area (used for RO address - 
CCHHO) 


Sfilename.K 


IJICNT 


193-200 


C1-C8 




Work area (used for RO data field) 


&Filename.C 


ijias 


201-208 


C9-D0 




Work area (included only for span- 
ned or variable records for record 
count field) 


The channel program builder strings are generated fc 
the channel program building area 


Mowing the DTFDA table and preceding 


&Filename.O 




Variable 




Channel program builder string for 
READ ID macro. If READ ID is not 
specified, the string is not gene- 
rated 


&Filename.l 




Variable 




Channel program builder string for 
READ KEY macro. If READ KEY is 
not specified, the string is not ge- 
nerated 


&Filename.2 




Variable 




Channel program builder string for 
WRITE ID macro. If WRITE ID is 
not specified, the string is not gene- 
rated 



DTFDA (....Cont'd) 



DTF Assembly 
i:abel 


Module DSECT 
Label 


Bytes 


Bits 


Function 


Dec 1 Hex 


filename. 3 
5filename.4 
afilename.5 




Variable 
Variable 
Variable 




Channel program builderstring for 
WRITE KEY macro. If WRITE KEY 
is not specified, the string is not 
generated 

Channel program builder string for 
WRITE RZERO macro, if WRITE 
RZERO or WRITE AFTER is not speci- 
fied, the string is not generated 

Channel program builder string for 
WRITE AFTER macro. If WRITE 
RZERO or WRIT E AFTER is not spe- 
cified, the string is not generated 


The following section contains the channel program build areas and varies in size 


Sfilename.B 




0-7 00-07 
Variable 

Variable 




Seek CCW that is generated at 
program assembly time and used 
by all channel programs 

Area to build: 

1) Eight CCW's if AFTER is not 
specified 

2) Eight CCW's if spanned or vari- 
able length records and AFTER= 
YES is specified 

3) Seven CCW's if undefined or 
fixed records and AFTER= YES 
is specified 

Area to build: 

1) Eight CCW's if AFTER is not 
specified and VERIFY= YES is 
specified 

2) Eight CCW's if spanned or vari- 
able length records and AFTER= 
YES and VERIFY= YES are spe- 
cified 

3) Five CCW's if undefined or fixec 
records and AFTER= YES and 
VERIFY=YES are specified 


The following section Is added for spanned records only 






8 bytes 
8 bytes 
1 byte 



1 

2 

3 

4 

5-7 


Count save area 

SEEKADR save area 

1= Relative addressing 

1=IJIGET switch on 

1= Ignore hold switch on 

1= Reserved for use by DAMODV 

1= New volume SEEKADR 

Not used 



I 



DTFDA (....Cont'd) 



DTF Assembly 
Label 


Module DSEa 
Label 


Bytes 


Bits 




........ 1 


Dec 1 Hex 


■"'""""' 






Ibyte 




Reserved 






2 bytes 




Record size 






12 bytes 




Work area 






8 bytes 




Control word save area 


Thefollowingsection is added to the DTFDA table if DSKXTNT(relativeaddressing) Is specified | 


Sfilename.P 




3 bytes 




3X'00' for padding 


SFiiename.l 




5 bytes 




IDLOC record area (bucket used by 
module) 


SFiiename.S 




8 bytes 

4 bytes 
4 bytes 
8 bytes 




SEEKADR in the form: 
M,B1,B2,C1,C2,H1,H2,R 

DC A(&SEEKADR) 

DC A(&IDLOC) 

Work area for RELTYPE= DEC 


&Filename.X 




4 bytes 
4 bytes 




Save area for CCHH portion of 
actual DASD address 

Alteration factor for CI in SEEK 
ADR (see bytes 112-119) 
2311 : X'ooooooor 
2314/2319: X'OOOOOOOT 
3330 : X'00001300' 
3340 : X'OOOOOCOO' 
3350 : X'OOOOIEOO' 






4 bytes 




Alteration 

ADR (see b 

2311 

2314/2319 

3330 

3340 

3350 


Factor for C2 in SEEK 
y^tes 112-119) 

X'OOOOOOOA' 

X'00000014' 

X'00000013' 

X'OOOOOOOC 

X'OOOOOOl E' 






4 bytes 




Alteration 

ADR (see b 

2311 

2314/2319 

3330 

3340 

3350 


actor for HI in SEEK 
>^es 112-119) 

X'ooooooor 

X'OOOOOOOT 
X'OOOOOOOT 
X'OOOOOOOT 
X'OOOOOOOT 






Variable 
to end of 
DTF table 

Bytes 0-2 TTT2 - c 

t 

3 M-v 

4 B-b 
5-7 TTTl - r 

t 


umul 
KTN7 
hec 
olum 
in nL 
slati> 
nise 


DSKXTNT table composed of a 
variable number of 8-byte entries 
containing extent information in 
the following format: 

ative number of tracks in the DSK 
table entries up to and including 

jrrent entry 

e sequence number 

mber (0 for disk devices) 

/e track number of lower limit of 

itry 






A 2-byteend-of-table indicator containing X'FFFF' 
follows the last entry in the DSKXTNT table 



DTFIS (Load) 



DTF Assembly 


Bytes 






Label 


Dec 


Hex 






&FIIename 


-15 


00-OF 




Command Control Block (CCB) 




16 


10 




1 

2 
3 
4 

5 
6 

7 


Used by ISAM Interface Program 

Not used 

1= COBOL open; ignore option 

Not used 

1= DTF table address constants relocated by 

OPENR 
Not used 

1= Data set security 
1 = Wrong blocksize error during file extension 




17-19 


11-13 




Address of logic module 




20 


14 




File type for OPEN/CLOSE (X'24'= LOAD) 




21 


15 



1 

2 
3 
4 
5 
6 
7 


Option byte: 

Not used 

Not used 

1= Cylinder overflow option 

Not used 

1= Blocked records (used by previous versions) 

1= Verify 

Not used 

1=2 I/O areas present 




22-28 


16-lC 




File name 




29 


ID 




Prime data device type indicator. 
X'00'=2311 ; X'Or= 2314/2319; 
X'04'= 3330; 

X'08'= 3340 general; X'09'= 
3340 35MB; X'OA'= 3340 70MB 


8f ilename.C 


30 


IE 



1 
2 
3 

4 

5 
6 

7 


Status byte: 

1= Uncorrectable DASD error (except WLR) 

1=WLR error 

1= Prime data area full 

1= Cylinder index area not large enough to 
reference prime data area. Set on only if 
error detected at SETFL time 

1= Master index not large enough to reference 
prime data area. Set on only if error detec- 
ted at SETFL time 

1= Duplicate record 

1= Sequence error 

l=No EOF record written in prime data area 




31 


IF 




High level index device type indicator: 

X'00'= 231 1 ; X'Ol '= 2314/2319 ; 

X'04'= 3330; 

X'08'= 3340 general ; X'09>= 

3340 35MB ; X'OA'= 3340 70MB 




32 


20 




Relative position of the DSKXTN (logical unit, 
cell number) table (in words). This value is the 
length of the DTF table divided by 4 



DTFIS(Load) (...Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




33-34 


21-22 




First prime track In cylinder (HH) 




35 


23 




First prime data record In cylinder (R) 




36-37 


24-25 




Last prime track in cylinder (HH) 




38 


26 




High record on master inde^cy Under Index 
track (R) 




39 


17 




High record on prime data track (R) 




40 


28 




High record on overflow track (R) 




41 


29 




High record on last track Index track in 
cylinder (whether shared or unshared) 




42 


2A 




High record on track index track other than last 
in cylinder, if only one track index track in 
cylinder, it is equal to byte 41 




43 


2B 



1 
2 
3 
4 

5 
6-7 


Condition code : 

1= WLR checks requested (for extension) 

1= First record In file 

1= Prime data extent full 

1 = Master IndeVcylmder Index extent too small 

1= Prime data upper limit has been increased 

(for extension) 

1= Extension 

Not used 




44-50 


2C-32 




Prime data lower limit (MBBCCHH) 




51-57 


33-39 




Cylinder Index lower limit (MBBCCHH) 




58-64 


3A-40 




Master index lower limit (MBBCCHH) 




65 


41 


0-3 
4 
5 
6 

7 


Number of index levels 

Not used 

1=RPS type device (data) 

1=RPS type DTF 

1= Master index 

1=RPS type device (index) 


&Filename.H 


66-73 


42-29 




Address of lost prime data record (MBBCCHHR) 




74-75 


4A-4B 




Logical record length 




76-77 


4C-4D 




Key length 




78-79 


4E-4F 




Block length (logical record length times 
number of records) 




80-81 


50-51 




Overflow record length (logical record length 
plus 10) 




82-83 


52-53 




Blocking factor (number of logical records) 




84-85 


54-55 




Index entry length (key length plus 10) 




86-87 


56-57 




Prime data record length (key length plus 
physical record length) 




88-89 


58-59 




Overflow record length with key (key length 
plus logical record length plus 10) 




90-91 


5A-5B 




Prime data record format length (key length plus 
physical record length plus 8) 



DTFIS(Load) (....Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




92-93 


5C-5D 




Overflow record format length (key length plus 
logical record length plus 18) 




94-95 


5E-5F 




Key location (In blocked records) 


This Is the end of the common DTF area. The format of the remainder of the table Is vari- 
able and Is generated according to the parameters specified in the DTF IS macro Instruction 


Sfilename.S 


96-103 


60-67 




Seek/search address area (MBBCCHHR) 


Sfiiename.P 


104-105 


68-69 




Logical record counter (for blocking) 




106-107 


6A-6B 




Number of bytes for high level Index 




108-111 


6C-6F 




Prime data record counter (logical records) 




112 


70 


0-1 

2 
3-5 

6 

7 


Status indicators: 

Not used 

1= File closed 

Not used 

1= Last prime data track full 

1= Last block full 




113-117 


71-75 




Last track index normal entry address (CCHHR) 




118-122 


76-7A 




Last cylinder index entry address (CCHHR) 




123-127 


7B-7F 




Last master Index entry address (CCHHR) 


filename. B 








CCW build area. See description of SETFL 
macro, phase 1 - S$B SETFL 




128-135 


80-87 




Seek CCW 




136-143 


88-8F 




Search ID Equal CCW 




144-151 


90-97 




TIC CCW 




152-159 


98-9F 




Read/Write CCW 




160-167 


A0-A7 




Search ID Equal CCW 




168-175 


A8-AF 




TIC CCW 




176-183 


B0-B7 




Verify CCW 


fifilename.M 


184-187 


B8-BB 




Address of lOREAL 




188-191 


BC-BF 




Address of data in WORKL. (FIXBLK= address 
of WORKL; FIXUNB= address of WORKL plus 
key). 




192-195 


C0-C3 




Address of key In WORKL. (FIXBLK= address 
of WORKL plus KEYLOC minus 1; FIXUNB= 
address of WORKL.) 




196-199 


C4-C7 




Block position indicator (address of logical 
record In lOAREAL) 




200 


C8 


0-2 
3 

4-6 

7 


Master Index, extension indicator: 

Not used 

1= Extending file; 0= Creating file 
Not used 

1= Master Index being used; 0= No master Index 
being used 



I 



DTFIS(Load) (....Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




201-204 


C9-CC 




Cylinder index upper limit (CCHH) 




205-208 


CD-DO 




Master index upper limit (CCHH) 




209-215 
216-222 


D1-D7 
D8-DE 




Prime data upper limit (old upper limit if exten- 
sion) (MBBCCHH) 

Prime data new upper limit (for extension) 
(MBBCCHH) 




223 


DF 




Last prime data track in cylinder minus 1 




224-225 


EO-El 




Key length minus one 




226-227 


E2-E3 




Logical record length minus 1 




228-229 


E4-E5 




Address of track index dummy record (HR) 




230-231 


E6-E7 




Address of record before first prime data record 
in cylinder (HR) 




232 


E8 




Number of records on master inde^cyl inder 
index track minus 1 




233-236 


E9-EC 




Master indeVcyl inder index DASD address 

control field (CCHH): 

231 1 = X'00C70009' 

2314/2319= X'OOC 7001 3' 

3330 =X'01FF0012' 

3340 =X'01FF000C' 




237-239 


ED-EF 




Prime data address control field (CCH): 
2311 =X'00C700' 
2314/2319= X'00C700' 
3330 = X'OIFFOO- 
3340 =X'01FF00' 




240-242 


F0-F2 




f^rime data beginning of volume (CCH): 
2311 =X'000100' 
2314/2319= X'OOOl 00' 
3330 = X'OOOl 00' 
3340 = X'OOOl 00' 




243-245 


F3-F5 




Prime data end of volume (CCH): 

2311 =X'00C700' 

2314/2319= X'00C700' 

3330 =X'019300' 

3340 =X'015B00'(35MB), X'02B700'(70MB) 




246-247 


F6-F7 




Used for alignment 




248-251^ 


F8-FB 




First entry in DSKXTN table (logical unit, 
cell number) 




256-259^ 


100-103 




X'FFFFFFFF'= End of DSKXTN table 




260-263 


104-107 




Address of IOAREA2 




264-267 


108-lOB 




Address used to relocate IOAREA2 



1) Each entry in the DSKXTN table is 4 bytes long. The minimum number of entries is 
two. There is one entry per extent. 

2) Location of the end-of-table indicator depends on length of DSKXTN table 



DTFIS (Add) - part 1 



DTF Assembly 
Label 


By 


fes 


BI-s 


Function 


Dec 


Hex 


8f ilename 


-15 


M-:- 




CCB 




16 


10 



1 

2 
3 
4 

5 
6 

7 


Not used 

Not used 

1= COBOL open; ignore option 

l=Track hold specified 

1= DTF table address constants relocated by 

OPENR 
Not used 

1= Data set security 
1= Wrong blocksize error during addition to file 




17-19 


11-13 




Logic module address 




20 


14 




File type for OPEN/CLOSE (X'25'= ADD) 




21 


15 



1 

2 
3 
4 
5 
6-7 


Option byte: 

Not used 

1= Prime data in core 

1= Cylinder overflow 

1= Cylinder Index in core 

1= Blocked records 

1= Verify 

Not used 




22-28 


16-lC 




DTF file name 




29 


ID 




Prime data device type indicator: 

X'00'=23n X'0T= 2314/2319 

X'04'=3330 

X'08'= 3340 general 

X'09'= 3340 (35MB) X'0A'= 3340 (70MB) 


&Filename,C 


30 


IE 



1 
2 
3 

4 
5 
6 

7 


Status byte: 

1= Uncorrectable DASD error (except WLR) 

1 = WLR error 

l=EOF (sequential) 

1= No record found 

1= Illegal ID specified 

1= Duplicate record sensed 

1= Overflow area full 

1= Record retrieved from overflow area 




31 


IF 




Highest level index device type: 

X'00'=23n X'OT= 2314/2319 

X'04'=3330 

X'08'= 3340 general 

X'09'= 3340 (35MB) X'OA'= 3340 (70MB) 




32 


20 




Relative position of the DSKXTN (logical unit, 
cell number) table (in words). This value is the 
length of the DTF table divided by 4 




33-35 


21-23 




First prime data record in cylinder (HHR) 




36-37 


24-25 




Last prime data track in cylinder (HH) 




38 


26 




High record number on master inde>/cy Under 
index track (R) 



I 



DTFIS (Add) -part 1 (....Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




39 


27 




High record number on prime data track (R) 




40 


28 




High record number on overflow track (R) 




41 


29 




High record number on shared track (R) 




42 


2A 




High record number on track index (Tl) track (R) 




43 


2B 



1 

2 
3 

4 
5 
6 

7 


Retrieval byte : 

l = WORKR area specified 

1= WORKS area specified 

Overflow switch 

l=Read 

Not used 

1= Output 

1= Write key 

1= PUT macro issued 




44-50 


2C-32 




Prime data lower limit (MBBCCHH) 




51-57 


33-39 




Cylinder index lower limit (MBBCCHH) 




58-64 


3A-40 




Master index lower limit (MBBCCHH) 




65 


41 




1 

2-3 

4 

5 

6 

7 


Switches 

1= From WAITF routine 

1=WAITF seek check bit 

Not used 

1= RPS type device (data) 

1=RPS type DTF 

1= Master index 

1= RPS type device (index) 




66-73 


42-49 




Last prime data record address (MBBCCHHR) 




74-75 


4A-4B 




Logical record length (RECSIZE) 




76-77 


4C-4D 




Key length (KEYLEN) 




78-79 


4E-4F 




Block size (logical recond length times number 
of records) 




80-81 


50-51 




Overflow record length (logical record length 
plus 10) 




82-83 


52-53 




Blocking factor (number of logical records in 
block (NRECDS) 




84-85 


54-55 




Index entry length (key length plus 10) 




86-87 


56-57 




Prime data record length (key length plus 
physical record length (block size) 




88-89 


58-59 




Overflow record length plus key (key length 
plus logical record length plus 10) 




90-91 


5A-5B 




Prime data record format length (key length 
plus blocksize plus 8) 




92-93 


5C-5D 




Overflow record format length (key length 
plus logical record length plus 18) 




94-95 


5E-5F 




Key location (KEYLOC) for blocked records 




96-97 


60-61 




Constant = 5 




98-99 


62-63 




Constant = 10 



DTFIS (Add) - part 1 {....Cc-rd] 



DTF Assent ly 
Label 


Bytes 


3Fh 


Function 


Dec 


Hex 




100-101 


64-65 




D'< placement of part 2 of the DTFIS table from 
start of part 1 




102-103 


66-67 




Displacement of part 3 of the DTFIS table from 
start of part 1 


jfilename.S 


104-113 


68-71 




Seek/search address area (MBBCCHHRFP) 


tfllename.W 


114-123 


72-7B 




Random/sequential retrieval work area 


5i=ilename.P 


124-127 


7C-7F 




Prime data record count 




128 


80 


0-1 

2 
3-5 

6 

7 


Status indicators: 

Not used 

1= File closed 

Not used 

1= Last prime data track full 

1= Block complete 




129-133 


81-85 




Last track index normal entry address (CCHHR) 




134-138 


86-8A 




Last cylinder index entry address (CCHHR) 




139-143 


8B-8F 




Last master index entry address (CCHHR) 




144-151 


90-97 




Last independent overflow record address 
(MBBCCHHR) 


8f ilename.l 


152-153 


98-99 




Number of independent overflow tracks 


fifilename.A 


154-155 


9A-9B 




Number of full cylinder overflow areas 


Sfllename.O 


156-157 


9C-9D 




Overflow record count 




158-164 


9E-A4 




Independent overflow area lower limit 
(MBBCCHH) 




165-171 


A5-AB 




Independent overflow area upper limit 
(MBBCCHH) 




172-175 


AC-AF 




A(8Filename.D) - Address of work area for 
cylinder overflow control record (COCR) 




176-179 


B0-B3 




A(&Filename.l>f8) - Address of workarea for 
the current track index normal entry count field 




180-183 


B4-B7 




A(&Filename.D+16) - Address of work area for 
current track index overflow entry count field 




184-187 


B8-BB 




A(5f ilename.D+24) - Address of workarea for 
current prime data record count field 




188-191 


BC-BF 




A(5f ilename.D+32) - Address of work area for 
current overflow record count field 




192-195 


C0-C3 




A(8f iIename.D+40) - Address of work area for 
track index normal entry data field 




196-199 


C4-C7 




A(&Filename,D+50) - Address of work area for 
current overflow record linkage field 




200-203 


C8-CB 




A(&IOREAL) - Address of lOREAL, the I/O 
area used for adding records to a file 



DTFIS (Add) - part 1 (....Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




204-207 

208-211 
212-215 

216-219 


CC-CF 

D0-D3 
D4-D7 

D8-DB 




A(&WORKL) - Address of WORKL, workarea 
containing user data records to be added to the 
file 

A(&Filename.K) - Address of the ADD key area 

A(&IOAREAL4«) - Address of key position in 
lOAREAL 

A(&IOAREAL4«+&KEYLEN) - Address of data 
position in lOAREAL 



DTFIS (Add) -part 2 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


8filename.2 


-3 


00-03 




A(8f ilename.Sf3) - Address of the seek/search 
address area plus 3 




4 


04 




1-5 
6 

7 


1= Seek check indicated 
Not used 

1= Over/under seek has occurred 
1= An error has been found, but a seek check 
is indicated 




5 -7 


05-07 




A(8f ilename.W) - Address of random/sequential 
retrieval work area 


The following 


informatior 


is genera 


edif 


the cylinder index in core option is specified 




12-15 


OC-OF 




A(&INDAREA) -Starting address of main storage 
area specified for cylinder index 




16-17 


10-11 




AL2(&1NDS1ZE) - Number of bytes in main 
storage available for cylinder index 




18-25 


12-19 




Next cylinder index entry to be read 
(MBBCCHHR) 




26-30 


IB-IE 




Last cylinder index entry (CCHHR) 




31 


IF 




1 
2 
3 

4-7 


Core index byte: 

1= First time through B-transient, SlBlNDEX 

1= End of cylinder index reached 

1= Index skip option specified 

1= Suppress in-core option and read cylinder 

index 
Not used 




32-35 


lD-23 




Pointer to key (stored by module) 



DTFIS(Add)-part2 (.. 



DTF Assembly 
Label 


Bytes 


BIi 


Function 


Dec 1 Hex 


The following information is ger.e — 
This information is aligned on c d=-_ 


ed ir fr.e prime data in core add function is specified 
sle word boundary 




36-37 


24-25 




Size of lOAREAL 




38-39 


26-27 




Maximum number of prime data records in main 
storage 




40-43 


28-2B 




Address of write CCW's 




44-47 


2C-2F 




Address of read CCW's 




48 


30 



1-7 


Switch byte: 
l=EOF 
Not used 


IJHDCWRK 


49 
50-51 


31 
32-33 




Reserved. 

Work fieldfor I/O Module. 



I 



DTFIS(Add)-port3 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


8f ilename.B 


-7 


00-07 




CCW X'07', 8f ilename.Sfl, X'40', 6 - Long 
seek CCW with command chaining 




8 -127 


08-7F 




Channel program build area. 


8f ilename.D 


128-135 


80-87 




Cylinder overflow control record (COCR) 




136-143 


88-8F 




Current track index normal entry count field 
address 




144-151 


90-97 




Current track index overflow entry count field 
address 




152-159 


98-9F 




Current prime data record count field address 




160-167 


A0-A7 




Current overflow record count field address 




168-177 


A8-B1 




Track index normal entry data field 




178-187 


B2-BB 




Current overflow record sequence link field 




188-197 


BC-B5 




Current track index overflow entry data field 




198 


C6 




X'Or -Add to EOF 

X'02' - Add to independent overflow area 




199-201 


C7-C9 




Overflow control bytes (CCH) 




202-203 


CA-CB 




High HR on overflow track 




204-211 


CC-D3 




Volume upper limit for prime data records 
(MBBCCHHR) 




212-217 


D4-D9 




CLC (&KEYLEN, 13),0 (6) - Unblocked 
CLC (&KEYLEN, 13),&KEYLOC-l (6) - 
Blocked Uti lity CLC for key 



DTFIS (Add) - part 3 (.. . .Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


&Filename.E 
&Filename.K 


218-223 

224-227' 

232-235^ 
236 + 


DA-DF 

E0-E3 

E8-EB 
EC-end 




MVC (&KEYLEN, 13),0 (12) - Unblocked 
MVC (&KEYLEN,13),&KEYLEN-1 (12) - 
Blocked Utility MVC for key 

First entry in DSKXTN table (logical unit, 
cell number) 

4X'FF' - End of DSKXTN table 

Key area for ADD only. Number of bytes de- 
pends on key length, KEYLEN 



1) Each entry in the DSKXTN table is four bytes long. The minimum number of entries is 
two. There is one entry per extent. 

2) Location of the end-of-table indicator depends on length of DSKXTN table. 



DTFIS (RETRVE, RANDOM) - re- 1 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


^Filename 


-15 


CO-Cf 




Command Control Block (CCB) 




16 
17-19 


10 
11-13 



1 
2 
3 
4 

5-6 

7 


Not used 

1= GET issued 

1= COBOL open; ignore option 

1= HOLD option specified 

1= DTF table address constants relocated by 

OPENR 
Not used 
1= Different blocksize in format-l label than 

in DTFIS. 
Address of logic module 




20 


14 




File type for OPEN/CLOSE (X'26'= RETRVE) 




21 


15 



1 
2 
3 
4 
5 
6-7 


Option byte: 








1= Prime data in core 

1= Cylinder overflow option 

1= Cylinder index in core option 

1 = Blocked records 

1= Verify 

Not used 




22-28 


16-lC 




File name (DTF name) 




29 


ID 




Prime data device type: 

X'00'=2311 X'01'= 2314/2319 

X'04'= 3330 
X'08'= 3340 general 
X'09'= 3340 (35MB) X'0A'= 3340 (70MB) 


Sfilename.C 


30 


IE 




1 
2 
3 
4 
5 
6 
7 


Status byte: 

1= Uncorrectable DASD error (except WLRerror) 

1 = WLR error 

1= EOF (sequential) 

l=No record found 

1= Illegal ID specified 

1= Duplicate record sensed 

1= Overflow area full 

1= Record retrieved from overflow area 




31 


IF 




High level index device type: 
X'00'=2311 X'01'= 2314/2319 

X'04'= 3330 
X'08'= 3340 general 
X'09'= 3340 (35MB) X'OA'= 3340 (70MB) 




32 


20 




Relative position of the DSKXTN (logical unit, 
cell number) table (in words). This value Is the 
length of the DTF table divided by 4 




33-35 


21-23 




First prime data record in cylinder (HHR) 




36-37 


24-25 




Lost prime data track in cylinder (HH) 




38 


26 




High record number on master index/cylinder 
index track (R) 




39 


27 




High record number on prime data track (R) 



DTFIS (RETRVE, RANDOM) - part 1 (. . . .Cont'd) 



DTF Assembly 
Label 


Byt 


3S 


Bits 


Function 


Dec 


Hex 




40 


28 




High record number on overflow track (R) 




41 


29 




High record number on shared track (R) 




42 


2A 




High record number on track index track (R) 




43 


2B 




1 
2 
3 
4 
5 
6 
7 


Retrieval byte ; 

1=WORKR specified 

1= WORKS specified 

Overflow switch 

1= Read key 

Not used 

1= Output 

1- Write key 

1= PUT macro issued 




44-50 


2C-32 




Prime data lower limit (MBBCCHH) 




51-57 


33-39 




Cylinder index lower limit (MBBCCHH) 




58-64 


3A-40 




Master index lower limit (MBBCCHH) 




65 


41 




1 

2 
3 
4 
5 
6 
7 


Switches 

1= From WAITF routine 
1- Seek check from WAITF 
1= Index track held 
1= Data track held 
1=RPS type device (data) 
1=RPS type DTF 
1= Master index 
1= RPS type device (index) 




66-73 


42-49 




Last prime data record address (MBBCCHHR) 




7A-75 


4A-4B 




Logical record length 




76-77 


4C-4D 




Key length 




78-79 


4E-4F 




Block size (logical record length times number 
of records) 




80-81 


50-51 




Overflow record length (logical record length 
plus 10) 




82-83 


52-53 




Blocking factor 




84-85 


54-55 




Index entry length (key length plus 10) 




86-87 


56-57 




Prime data record length key (key length plus 
physical record length) 




88-89 


58-59 




Overflow record length with key (key length 
plus logical record length plus 10) 




90-91 


5A-5B 




Prime data record format length key (key length 
plus physical record length plus 8) 




92-93 


5C-5D 




Overflow record format length key (key length 
plus logical record length plus 18) 




94-95 


5E-5F 




Key location (blocked records) 

1 — 



DTFIS (RETRVE, RANDOM) - =crr 1 (. . . .Cont'd) 



DTF Assembly 
Label 


By 


tes 


Bits 


Function 


Dec 


Hex 




96-97 


60-61 




Constant= 5 




98-99 


62-63 




Constant^ 10 




100-101 


64-65 




Displacement of part 2 of the DTFIS table from 
part 1 




102-103 


66-67 




Displacement of part 3 of the DTFIS table from 
part 1 


&Filename,S 


104-113 


68-71 




Seek/search address area (MBBCCHHRFP) 


SFllename.W 


114-123 


72-7B 




Random/sequential retrieval work area 



DTFIS (RETRVE, RANDOM) - part 2 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


8filename,2 


-3 

4 


00-03 
04 




1-5 

6 

7 


Address of seek/search address area plus 3 
1= Seek check indicated 
Not used 

1= Over/under seek has occurred 
1= An error has been found, but a seek check 
is indicated 




5 -7 


05-07 




Address of random/sequential retrieval work area 




8 -11 


08-OB 




Address of lOAREAS 




12-15 


OC-OF 




Address of lOAREAR 




16-19 


10-13 




Address of KEY ARC 




20-23 


14-17 




Address of WORKR 




24-27 


18-lB 




Current sequential I/O area address 




28-31 


IC-IF 




4-byte NO-OP instruction, or 
L lOREG, * - 4 if lOREG specified. 




32 


20 




X'00'= No verify; X'40'= Verify 




33 


21 




X'08'= Unblocked; X'00'= Blocked 




34 


22 




R= First prime data record on shared track 




35-39 


23-27 




Upper limit for sequential retrieval (CCHHR) 




40-41 


28-29 




H'0'= Blocked records 
H'2'= Overflow record 
H'8'= Unblocked records 




42 


2A 




X'C7'= 231 1,2314 or 2319 
X'FF'=3330, 3340 




43-47 


2B-2F 




Initial values for sequential retrieval 


Sf ilename.H 


48-55 


30-37 




Current DASD address for sequential (MBBCCHHR) 




56-63 


38-3F 




Current overflow DASD address for sequential 
(MBBCCHHR) 



DTFIS (RETRVE, RANDOM) - part 2 (. . . .Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


Sfilename.T 
&Filename.G 
&Filename.R 


64-65 
66-67 
68-69 
70-71 
72-79 
80-83 
84-87 


40-41 
42-43 
44-45 
46-47 
48-4F 
50-53 
54-57 




Sequential record counter 

Current track Index entry for sequential (HR) 

Number of records tagged for deletion 

Load lOREG for random retrieval 

DASD address save area (MBBCCHHR) 

Record pointer within I/O area for write operation 

Nonflrst overflow record count 


The following Information Is generated when the cylinder Index In core option Is specified 




92-95 
96-97 
98-105 

106-110 
111 

112-115 
116-131 


5C-5F 
60-61 
62-69 

6A-6E 
6F 

70-73 
74-83 



1 
2 
3-7 


A(&INDAREA) - Starting address of main storage 
area specified for cylinder Index 

AL2(&INDSIZE) - Number of bytes In main sto- 
rage available for cylinder Index 

Next cylinder index entry to be read (MBBCCHHR) 
(Initialized by $$BINDEX to cylinder index 
starting address) 

Lost cylinder index entry 

Core index byte: 

1= First time through transient 

1= End of index reached 

1= Index skip option 

Not used 

Pointer to key (stored by the module) 

Reserved 



DTFIS (RETRVE, RANDOM) - part 3 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


Sfilename.B 


-7 


00-07 




X'07',Sfilename.Sl-l,X'40',6 - Long seek CCW 
with command chaining 




8 -63 


08-3F 




Area to build CCW-string 




64-671) 


40-43 




First entry in DSKXTN table (logical unit,cell 
number) 




72-752) 


48-4B 




4X'FF' End of DSKXTN table 



1) The length of one entry is the four bytes shown here. The minimum number of entries is 2. 
There is one entry per extent. 

2) The location of the end-of-table indicator depends on the length of DSKXTN table. 



DTFIS (RETRVE.SEQNTL) - per* 1 



DTF Assembly 
Label 


Bytes 


Bin 


Function 


Dec 


Hex 


^Filename 


-15 


00-OF 




Command Control Block (CCB) 




16 


10 



1 
2 
3 

4 

5 
6 
7 


Used by ISAM Interface Program 

1= GET Issued 

1= COBOL open; ignore option 

1 = Track Hold specified 

1= DTF table address constants relocated by 

OPENR 
1= EOF on sequential retrieve 
1= Data set security 
1= Different blocksize In format 1 label than in 

DTFIS 




17-19 


11-13 




Address of logic module 




20 


14 




File type for OPEN/CLOSE (X'26'= RETRVE) 




21 


15 




1 
2 
3 
4 
5 
6 
7 


Option byte: 

Not used 

1 = Prime data In core 

1= Cylinder overflow option 

1= Cylinder index in core option 

1 = Blocked records 

1= Verify 

1= lOAREAS just used; 0= 10AREA2 just used 

1=2 I/O areas present 




22-28 


16-lC 




File name (DTF name) 




29 


ID 




Prime data device type: 

X'00'=2311 X'01'= 2314/2319 

X'04'= 3330 
X'08'= 3340 general 
X'09'= 3340 (35MB) X'OA'= 3340 (70MB) 


&FiIename,C 


30 


IE 





Status byte: 

1= Uncorrectable DASD error (except WLR error) 

1 = WLR error 

l=EOF (sequential) 

l=No record found 

1= Illegal ID specified 

1= Duplicate record sensed 

1= Overflow area full 

1= Record retrieved from overflow area 




31 


IF 




High level Index device type: 
X'00'=2311 X'01'= 2314/2319 

X'04'= 3330 
X'08'= 3340 general 
X'09'= 3340 (35MB) X'0A'= 3340 (70MB) 




32 


20 




Relative position of the DSKXTN (logical unit, 
cell number) table (In words). This value Is the 
length of the DTF table divided by 4) 




33-35 


21-23 




First prime data record in cylinder (HHR) 




36-37 


24-25 




Last prime data track in cylinder (HH) 



DTFIS (RETRVE, SEQNTL) - port 1 (. . .Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




38 


26 




High record number on master indeVcylinder 
index track (R) 




39 


27 




High record number on prime data track (R) 




40 


28 




High record number on overflow track (R) 




41 


29 




High record number on shared track (R) 




42 


2A 




High record number on track index track (R) 




43 


2B 



1 
2 
3 
4 

5 
6 

7 


Retrieval byte : 

l=WORKR specified 

1= WORKS specified 

Overflow switch 

l=Read key 

1= First record being processed (after issuing 

SETL macro) 
1= Output 
1= Write key 
1=PUT macro issued 




44-50 


2C-32 




Prime data lower limit (MBBCCHH) 




51-57 


33-39 




Cylinder index lower limit (/v\BBCCHH) 




58-64 


3A-40 




Master index lower limit (MBBCCHH) 




65 


41 



1 
2-3 

4 
5 
6 

7 


Index level number, WAITF indicator : 

1= From WAITF routine 

1= WAITF seek check bit 

Not used 

1= RPS type device (data) 

1= RPS type DTF 

1= Master index 

1= RPS type device (index) 




66-73 


42-49 




Last prime data record address (MBBCCHHR) 




74-75 


4A-4B 




Logical record length 




76-77 


4C-4D 




Key length 




78-79 


4E-4F 




Block size (logical record length times number 
of records) 




80-81 


50-51 




Overflow record length (logical record length 
plus 10) 




82-83 


52-53 




Blocking factor 




84-85 


54-55 




Index entry length (key length plus 10) 




86-87 


56-57 




Prime data record length (key length plus 
physical record length 




88-89 


58-59 




Overflow record length with key (key length 
plus logical record length plus 10) 




90-91 


5A-5B 




Prime data record format length (key length 
plus physical record length plus 8) 




92-93 


5C-5D 




Overflow record format length (key length plus 
logical record length plus 18) 




94-95 


5E-5F 




Key location (blocked records) 



III -82 



DTFIS (RETRVE.SEQNTL) - pert 1 (....Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




96-97 


60-61 




Constont= 5 




98-99 


62-63 




Constant= 10 




100-101 


64-65 




Displacement of part 2 of the DTFIS table from 
part 1 




102-103 


66-67 




Displacement of part 3 of the DTFIS table from 
part 1 


8f iiename.S 


104-113 


68-71 




Seek/search address area (MBBCCHHRFP) 


Sfilename.W 


114-123 


72-7B 




Random/sequential retrieval work area 



DTFIS (RETRVE,SEQNTL) - part 2 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


8filename.2 


-3 


00-03 




Address of seek/search address area plus 3 




4 


04 




1-5 

6 

7 


l=Seek check indicated 
Not used 

1= Over/under seek has occurred 
1= An error has been found, but a seek check 
is indicated 




5 -7 


05-07 




Address of randorVsequential retrieval work area 




8 -11 


08-OB 




Address of lOAREAS 




12-15 


OC-OF 




Address of IOAREA2 




16-19 


10-13 




Address of KEYARG 




20-23 


14-17 




Address of WORKR 




24-27 


18-lB 




Current sequential I/O area address 




28-31 


IC-IF 




LIOREG,*-4- Load lOREG 
or a 4 byte NO-OP instruction 




32 


20 




X'00'= No verify; X'40'= Verify 




33 


21 




X'08'= Unblocked records; X'00'= Blocked rec'ds 




34 


22 




R= First prime data record on shared track 




35-39 


23-27 




Upper limit for sequential retrieval (CCHHR) 




40-41 


28-29 




H'0'= Blocked records 
H'2'= Overflow record 
H'8'= Unblocked records 




42 


2A 




X'C7'= 231 1,2314 or 2319; X'09'=2321; 
X'FF'=3330, 3340 




43-47 


2B-2F 




Initial values for sequential (CCHHR) 


Sfilename.H 


48-55 


30-37 




Current DASD address for sequential retrieval 
(MBBCCHHR) 




56-63 


38-3F 




Current overflow DASD address (MBBCCHHR) 



I 



DTFIS (RETRVE,SEQNTL) 


- part 2 


(.. 


.Cont'd) 




DTF Assembly 
Label 


Byres 


Bits 


Function 


Dec 


Hex 




64-65 


40-41 




Sequential record counter 




66-67 


42-43 




Current track index entry (HR) 


&Filename.T 


68-69 


44-45 




Number of records togged for 
deletion. 




70-75 


46-4B 




For boundary alignment. 




76-91 


4C-5E 




Reserved. 



DTFIS (RETRVE.SEQNTL) - part 3 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


Sfilename.B 


-7 


00-07 




X'07',8f ilename.Sfl, X'40',6 - Long seek 
CCW with command chaining 




8 -63 


08-3F 




Area to build CCW-string 


&Filename.E 


64-67') 


40-43 




First entry in DSKXTN table (logical unit,cell 
number) 




72-752) 


48-4B 




4X'FF' - End of DSKXTN table 



1) The length of one entry is the four bytes shown here. The minimum number of entries is 2. 
There is one entry per extent. 

2) The location of the end-of-table indicator depends on the length of DSKXTN table. 
DTFIS (ADDRTR) - part 1 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


Sfilename 


-15 


00-OF 




Command Control Block (CCB) 




16 


10 




1 
2 
3 
4 

5 
6 

7 


Used by ISAM Interface Program 

1= GET issued 

COBOL open; ignore option 

1= Track hold option specified 

1= DTF table address constants relocated by 

OPENR 
EOF switch 
1= Data set security 
1 = Wrong blocksize error during addition to file 




17-19 


11-13 




Logic module address 




20 


14 




File type for OPEN/CLOSE (X'27'= ADDRTR) 




21 


15 




1 
2 
3 
4 


Option byte: 

Not used 

1= Prime data in core 

1= Cylinder overflow 

1= Cylinder index in core 

1= Blocked records 



DTFIS (ADDRTR) - part 1 {....Cc-rd] 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




21 

(Cont'd) 




5 
6 

7 


1= Verify 

1= lOAREAS just used; 0= IOAREA2 just used 

1=2 I/O areas present 




22-28 


16-lC 




DTF file name 




29 


ID 




Prime data device type indicator: 
X'00'=2311 X'Or= 2314/2319 

X'04'= 3330 
X'08'= 3340 genera! 
X'09'= 3340 (35MB) X'OA'= 3340 (70MB) 


&filename.C 


30 


IE 



1 
2 
3 

4 
5 
6 

7 


Status byte: 

1= Uncorrectable DASD error (except WLR error) 

1=WLR error 

1= EOF (sequential) 

1= No record found 

1= Illegal ID specified 

1= Duplicate record sensed 

1= Overflow area full 

1= Record retrieved from overflow area 




31 


IF 




Highest level index device type: 
X'00'=23n X'01'= 2314/2319 

X'04'= 3330 
X'08'= 3340 general 
X'09'= 3340 (35MB) X'OA'= 3340 (70MB) 




32 


20 




Relative position of the DSKXTN (logical unit, 
cell number) table (in words). This value is the 
length of the DTF table divided by 4. 




33-35 


21-23 




First prime data record in cylinder (HHR) 




36-37 


24-25 




Last prime data track in cylinder (HH) 




38 


26 




High record number on master indejy'cy Under 
index track (R) 




39 


27 




High record number on prime data track (R) 




40 


28 




High record number on overflow track (R) 




41 


29 




High record number on shared track (R) 




42 


2A 




High record number on track index (Tl) track (R) 




43 


2B 



1 
2 
3 
4 

5 
6 

7 


Retrieval byte: 

l=WORKR area specified 

l = WORKS area specified 

Overflow switch 

1= Read 

1= First record being processed (after issuing 

5ETL macro) 
1= Output 
1= Write key 
1=PUT macro issued 




44-50 


2C-32 




Prime data lower limit (MBBCCHH) 



I 



DTFIS (ADDRTR) - parf 1 (....Conf'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




51-57 


33-39 




Cylinder index lower limit (MBBCCHH) 




58-64 


3A-40 




Master index lower limit (MBBCCHH) 




65 


41 



1 
2 
3 

4 
5 
6 

7 


Index level number, WAITF and track 

hold indicators : 

l=From WAITF routine 

1= Seek check from WAITF 

1= Index track held 

1= Data track held 

1=RPS type device (data) 

1=RPS type DTF 

l=Master index; 

1=RPS type device (index) 


&Filename.H 


66-73 


42-49 




Last prime data record address (MBBCCHHR) 




74-75 


4A-4B 




Logical record length (RECSIZE) 




76-77 


4C-4D 




Key length (KEYLEN) 




78-79 


4E-4F 




Block size (logical record length times number 
of records) 




80-81 


50-51 




Overflow record length (logical record length 
plus 10) 




82-83 


52-53 




Blocking factor (number of logical records in 
block (NRECDS)) 




84-85 


54-55 




Index entry length (key length plus 10) 




86-87 


56-57 




Prime data record length (key length plus phy- 
sical record length (block size) 




88-89 


58-59 




Overflow record length with key (key length 
plus logical record length plus 10) 




90-91 


5A-5B 




Prime data record format length (key length plus 
block size plus 8) 




92-93 


5C-5D 




Overflow record format length (key length plus 
logical record length plus 18) 




94-95 


5E-5F 




Key location (KEYLOC) for blocked records 




96-97 


60-61 




Constant = 5 




98-99 


62-63 




Constant = 10 




100-101 


64-65 




Displacement of part 2 of the DTFIS table from 
start of part 1 




102-103 


66-67 




Displacement of part 3 of the DTFIS table from 
start of part 1 


SFilename.S 


104-113 


68-71 




Seek/search address area 


&Filename.W 


114-123 


72-7B 




Random/sequential retrieval work area 


&Filename.P 


124-127 


7C-7F 




Prime data record count 




128 


80 


0-1 
2 

3-5 
6 

7 


Status indicators : 

Not used 

l=File closed 

Not used 

1= Last prime data track full 

1= Block complete 



DTFIS (ADDRTR) - part 1 (. . . .Cc-i'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




129-133 


81-85 




Last track Index normal entry address (CCHHR) 




134-138 


86-8A 




Last cylinder index entry address (CCHHR) 




139-143 


8B-8F 




Last master index entry address (CCHHR) 




144-151 


90-97 




Last independent overflow record address 
(MBBCCHHR) 


Sfilename. 1 


152-153 


98-99 




Number of independent overflow tracks 


&Filename.A 


154-155 


9A-9B 




Number of full cylinder overflow areas 


SFilename.O 


156-157 


9C-9D 




Overflow record count 




158-164 


9E-A4 




Independent overflow area lower limit (MBBCCHH) 




165-171 


A5-AB 




Independent overflow orea upper limit (MBBCCHH) 




172-175 


AC-AF 




A(8f ilename.D)- Address of work area for cy- 
linder overflow control record (COCR) 




176-179 


B0-B3 




A(&FiIename.D+8) - Address of work area for 
the current track index normal entry count field 




180-183 


B4-B7 




A(&Filename.D+16) - Address of work area for 
current track index overflow entry count field 




184-187 


B8-BB 




A(8f ilename.D+24) - Address of work area for 
current prime data record count field 




188-191 


BC-BF 




A(&Filename.D+32) - Address of work area for 
current overflow record count field 




192-195 


C0-C3 




A(&Filename.D+40) - Address of work area for 
track index normal entry data field 




196-199 


C4-C7 




A(&Filename,D+50) - Address of work area for 
current overflow record sequence-link field 




200-203 


C8-CB 




A(&IOAREAL) - Address of lOAREAL, the I/O 
area used for adding records to a file 




204-207 


CC-CF 




A(&WORKL) - Address of WORKL, work area 
containing user data records to be added to a file 




208-211 


D0-D3 




A(5f ilename.K) - Address of the ADD key area 




212-215 


D4-D7 




A(&IOAREAL4«) - Address of key position in 
lOAREAL 




216-219 


D8-DB 




A(&IOAREAL4«+&KEYLEN) - Address of data 
position in lOAREAL 



I 



DTFIS (ADDRTR) - part 2 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


8fMename.2 


-3 


00-03 




A(8Filename.Sf3) - Address of the seek/search 
address area plus 3 




4 


04 




1-5 

6 

7 


l=Seel< check indicated 
Not used 

1= Over/under seek has occurred 
1= An error has been found, but a seek check is 
indicated 




5 -7 


05-07 




A(8f ilename.W) - Address of the random/sequen- 
tial retrieval work area 




8 -n 


08-OB 




Address of lOAREAS, I/O area used for sequen- 
tial retrieval 




12-15 


OC-OF 




Address of iOAREAR, I/O area used for random 
retrieval or address of IOAREA2 (if specified) for 
sequential retrieval 




16-19 


10-13 




Address of KEY ARC, field containing usersupplied 
key used for random READ/WRITE operations and 
sequential retrieval initiated by key 




20-23 


14-17 




Address of WORKR, v/ork area used for random 
retrieval 




24-27 


18-lB 




Current sequential I/O area address 




28-31 


IC-IF 




1) L IOREG,*-4 - Load I/O register for sequen- 
tial or 

2) 4- byte NO-OP instruction for random 




32 


20 




X'00'= No verify; X*40'= Verify 




33 


21 




X'00'= Blocked; X'08'= Unblocked 




34 


22 




R= First prime data record on shared track 




35-39 


23-27 




Limits for sequential (CCHHR) 




40-41 


28-29 




H'0'= Blocked records 
H '2'= Overflow records 
H'8'= Unblocked records 




42 


2A 




X'C7'= 231 1,2314 or 2319; 
X'FF'=3330, 3340 




43-47 


2B-2F 




Initial values for sequential 


8f ilename.H 


48-55 


30-37 




Current sequential DASD address (MBBCCHHR) 




56-63 


38-3F 




Current overflow DASD address (MBBCCHHR) 




64-65 


40-41 




Sequential record count 




66-67 


42-43 




Current track index entry for sequential (HR) 


Sfilename.T 


68-69 


44-45 




Number of records tagged for deletion 




70-71 


46-47 




LR &10REG,0 for random (or 2-byte NO-OP 
for sequential) 


&Filename.G 


72-79 


48-4F 




DASD address save area for random retrieval 
(MBBCCHHR) 



DTFI S(ADDRTR)-pQrt2 (....Cont'd) 



DTF Assembly 
Label 


Bytes 
Dec 1 Hex 


Bits 


Function 




80-83 


50-53 




Record pointer within I/O area for write (for 
random retrieval) 


SFilename.R 


84-87 


54-57 




Non-first overflow record count 


The following information is genera 
Bytes 88-91 (58-5B) are nof used. 


ed if the cylinder index in core option is specified. 




92-95 


5C-5F 




A(&INDAREA) - Starting address of main storage 
area specified for cylinder index 




96-97 


60-61 




AL2(&!NDSIZE) - Number of bytes in main sto- 
rage avialable for cylinder Index 




98-105 


62-69 




Next cylinder index entry to be read 
(MBBCCHHR) 




106-110 


6A-6E 




Last cylinder index entry (CCHHR) 




111 


6F 



1 

2 
3 

4-7 


Core index byte: 

1= First time through B-transient, $$BINDEX 

1= End of cylinder index reached 

1= Index skip option specified 

1= Suppress Index in-core option and read 

cylinder index 
Not used 




112-115 


70-73 




Pointer to key (stored by module) 


The following information is genera 
This information is aligned on a dou 
prime data in core add functions are 
(116-131) (74-83). 


ed if the prime data in core add function is specified, 
ble word boundary, if both cylinder index in core and 
specified, the following information is foundin bytes 




116-117 


74-75 




Size of iOAREAL 




118-119 


76-77 




Maximum number of prime data records in main 
storage 




120-123 


78-7B 




Address of write CCW's 




124-127 


7C-7F 




Address of read CCW's 




128 


80 



1-7 


Switch byte: 
l=EOF 
Not used 


IJHDCWRK 


129 
130-131 


81 
B2-83 




Reserved. 

Work field for I/O module. 



DTFIS (ADDRTR) - port 3 



DTF Assembly 
Label 


Byfes 


Bits 


Funcfion 


Dec 


Hex 


5filename.B 


-7 


00-07 




X'07', a^ilename.Sfl, X'40', 6- Long seek 
CCW with command chaining 




8 -63 


08-3F 




Channel program build area 




64-127 


40-7F 




Channel progr. build area for add function only 


5filename.D 


128-135 


80-87 




Cylinder overflow control record (COCR) 




136-143 


88-8F 




Current track index normal entry count field 




144-151 


90-97 




Current track index overflow entry count field 




152-159 


98-9F 




Current prime data record count field 




160-167 


A0-A7 




Current overflow record count field 




168-177 


A8-B1 




Track index normal entry data field 




178-187 


B2-BB 




Current overflow record sequence-link field 




188-197 


BC-C5 




Current track index overflow entry data field 




198 


C6 




X'Or-AddtoEOF 

X'02' - Add to independent overflow area 




199-201 


C7-C9 




Overflow control bytes (CCH) 




202-203 


CA-CB 




High HR on overflow track 




204-211 


CC-D3 




Volume upper limit for prime data records 
(MBBCCHHR) 




212-217 


D4-D9 




CLC 0(&KEYLEN, 13),0(6) - Unblocked 
CLC0(aj<EYLEN,13),&KEYLOC-l(6) - Blocked 
Utility CLC for key 




218-223 


DA-DF 




MVC 0(&KEYLEN, 13),0(12) - Unblocked 
MVC 0(&KEYLEN, 13),&KEYL0C-1(12) - 
Blocked Utility MVC for key 


&Filename.E 


224-227^ 


' E0-E3 




First entr/ in DSKXTN table (logical unit, cell 
number) 




232-235^ 


' E8-EB 




4X'FF' - End of DSKXTN table 


&Fllename.K 


236+ 


EC-end 




Key area for add only. Number of bytes depends 
on key length, KEYLEN 



1) Each entry in the DSKXTN table is four bytes long. The minimum number of entries is 2, 
There is one entry per extent. 

2) Location of the end-of-toble indicator depends on length of DSKXTN table. 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


0-15 


0-F 






Command Control Block (CCB). 


16 


10 


0-3 
4 


B'OOOO' 


Not used. 

1=DTF relocated by OPENR. 






5-7 


B'OOO' 


Not used. 


17-19 


11-13 






Address of logic module. 


20 


14 




X'lA' 


DTF type for OPEN/CLOSE 
(X'lA'=di5kettefile). 


21 


15 







l=Command chained file. 






1-2 


B'OO' 


Not used. 






3 




l^Work area specified. 






4 


B'O' 


Not used. 






5 




1=Open;0=Close. 






6 




l = lnput; 0=Output. 






7 




Not used. 


22-28 


16-lC 






Filename. 


29 


ID 




X'06' 


Device type code (X '06=3540). 


30-35 


IE -23 




C'OOCHROO' 


Address of HDRl label in VTOC. 


36-37 


24-25 






Volume sequence number. 


38 


26 







Open communications byte. 

Input File 

l=No more extents 






1-2 


B'OO' 


Not us^d. 






3 




l=Exit for user's EOF routine. 






4 




l^Next extent on new volume. 






5-6 




Not used. 






7 




l=Extent switch. 
Output File 







1 




l=No more extents. 

l=£xtents needed at Close time. 






2-3 


B'OO' 


Not used. 






4 




l=Next extent on new volume. 






5 




l=Extent entered via console. 






6-7 




Not used 


39 


27 



0-7 




l=Extent bypassed before file 
opened (input). 
Sequence number of current 
extent opened (output). 


40 


28 






Sequence number of last extent 
opened. 


41-43 


29-2B 




X '000000' 


Reserved. 


44-47 


2C-2F 






Address of lOAREAl. 


48-51 


30-33 






Address of last Read/Write CCW 
in chain. 


52-53 


34-35 




X'OOOl' 


Lower record limit. 


54-57 


36-39 




X'OOCCOORR' 


End-of-data seek address (last 
record + 1) 


58-59 


3A-3B 






Number of records in I/O area 
(used in short chain processing). 


60-63 


3C-3F 




X'OOFFOOOr 


Seek argument (OCHR). 


64-67 


40-43 






End-of-file routine address 
(input); 4X'00' (output). 


68-71 


44-47 




X'0049001A' 


Seek argument control field. 


72 


48 






Command chaining factor. 



DTFDU ( Continued) 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


73 


49 




1 
2 
3 
4 


B'O' 


Switch byte 1 . 

l=Not first entry after open. 

Not used. 

l=In close routine (output). 

l=Error chain to be skipped. 

l=End of extent. 






5-7 


B'OOO' 


Not used. 


74-75 


4A-4B 






(record size multiplied by 
command chain factor)- 1. 


76-80 


4C-50 




X'FFFFFFFFFF' 


Seek argument bucket. 


81-83 


51-53 




X '000000' 


Reserved. 


84-87 


54-57 






instruction to load user's i/O 
register (or NOP). 


88-91 


58-5B 






Address of current I/O area. 


92-95 


5C-5F 






Logical record size. 


96-99 


60-63 






Address of last byte of the 
I/O area. 


100 


64 



1 
2 
3 
4 
5-7 




Logical indicators. 
1: ERROPT=address. 
1: ERROPT=IGNORE. 
1: ERROPT=SKIP. 
Not used. 
l=Two I/O areas. 
Not used. 


101-103 


65-67 






Address of user's error handling 
routine. 


104 


68 






CCW count (write command 
only). 


105 


69 




1 
2 




Allowed operations 
l=A!Iow read commands. 
l=Allow write commands. 
l=Suppress unit check on C4/C6. 






3-7 


B '00000' 


Not used. 


106 


6A 




X'OO' 


Sector factor (X'00'=128). 


107 


6B 




X'OO' 


Reserved . 


108 


6C 



1 
2 
3 
4 
5 
6 




l=Write protect. 

l=No feed at EOF . 

l=Check multivolume sequence. 

l=MuItivolume file. 

l=VerIfy requested. 

I=c6s written (update ERMAP) . 

l=Read/Write security. 






7 


B'O' 


Not used. 


109-111 


6D-6F 




X '000000' 


Not used. 


112-119 


70-77 






Feed CCW. 


120-127 


78-7F 






Define ops CCW (output); 
8X'00' (input). 


128-135 


80-87 






Seek CCW. 


136-143 


88-8F 






TIC CCW. 


144-X 


90-Y 




X=143+8*(/of CCVife) 
Y=8F+8*(/ of CCWs) 


Read/Write data CCWs, 1,2, 13, 
or 26. 
Read/Write CCWs. 


X+1 


Y+1 






NOP CCW (output only). 



DTFPH (Magnetic Tape) 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


-15 


00-OF 






CCB 


16 


10 


0-1 
2 
3 
4 

5 
6 

7 




Not used 

COBOL open; ignore option 

Not used 

DTF Table address; constants relocated 

by OPENR 

Not used 

1= ASCII 

0= EBCDIC 

Not used 


17-19 


11-13 




3X'00' 




20 


14 




X'12' 
X'14' 


Standard labeled, output 
Standard labeled, input, forward 


21 


15 


0-3 

4 

5-7 




Not used 

1= input; 0= output 

Not used 


22-29 


16-lD 






Symbolic filename 


30 


IE 






Not used 


31 


IF 


0-4 

5 

6-7 


B'OllOO' 


Used OS displacement by OPEN 








Reserved 


32 


20 




1-2 

3 

4 

5 

6-7 




1= Standard labels 

Not used 

1= No rewind 

Not used 

User label address; l=yes, 0= no 

Not used 


33-35 


21-23 






User label routine address 


36 


24 



1 

2 
3 
4 
5-7 




1= DTFPH table 

Not used 

File switch: 1= input, 0= output 

Not used 

1= EOF switch 

Not used 


37-39 


25-27 






User label exit 


40-43 


28-2B 




DCF'O' 


Reserved for OPEN 


44-87 


2C-57 






EOV routine 


88-89 


58-59 




DC 2X'00' 


Reserved for OPEN 


90-95 


5A-5F 




DC 6X'00' 


File serial number 


96-99 


60-63 




DC 4X'00' 


Volume sequence number 


100-103 


64-67 




DC4X'00' 


File sequence number 



I 



DTFPH (Sequential Disk) 



Bytes 


Bits 


Function 


Dec 


Hex 


-15 


00-OF 




CCB 


16 


10 



1 

2 

3 

4 

5-7 


1= Dequeue old volume extents 

Not used 

1= File assigned MGN' (COBOL) 

Not used 

1=DTF relocated by OPENR 

Not used 


17-19 


11-13 




3X'00' 


20 


14 




DTFtype(X'21') 


21 


15 




1 
2 
3 
4 
5 
6 
7 


Open/Close indicators 

Not used 

1= Blocked files 

1= Work file 

1= Work area 

1= Not version 1 table type 

1= Open; 0= Closed 

1= Input; 0= Output 

1= User labels specified 


22-28 


16-lC 




Filename (See byte 29) 


29 


ID 




Device type code: X ' 05 '= 3330-1 1 
X'00'=2311 X' 07 '=3350 
X'Or= 2314,2319 X '08 '= 3340 general 

X '09 '=3340 35MB 
X^04'= 3330-1, -2 X'0A'= 3340 70MB 


30 


IE 




C'F'= EOF indicator for DTFPH 


30-35 


lE-23 




(BCCHHR) Address of Fl label in VTOC (output) 
(BCCHHR) Address of next DLBL-EXTENT record (input) 


36-37 


24-25 




Volume sequence number 


38 


26 




Open communication byte: 
Output 








1 
2 
3 
4 
5 
6 
7 


1= No more EXTENTS 

1= EXTENTS for LIOCS at close 

1= Process trailer labels 

1= Process header labels 

1= New volume on next extent 

1= EXTENTS entered via console 

1= Process trailer labels at close 

1= Check EXTENT for minimum of 2 tracks 







1 
2 
3 
4 
5 


Input 

1= No more EXTENTS 

Not used 

l=NoFl label, process EXTENTS only 

Not used 

1= New volume on next EXTENT 

Not used 



DTFPH (Sequential Disk) ( . . . Cont'd) 



Bytes 


Bits 


Function 


Dec 


Hex 


38 
(Cont'd) 


26 


6 

7 


Open communications byte (Input) (Cont'd) 

1= Process header labels 
Not used 




39 


27 




Sequence number of current EXTENT being opened 




40 


28 




Sequence number of last EXTENT opened (not a console 


EXTENT 


41-43 


29-2B 




Address of user's label routine 


entry) 


44 


2C 


2 


1= Versions DTP 




45-47 


2D-2F 




Not used 




48-51 


30-33 




CCHH address of user's label track. Initially X'80000000' | 


52-53 


34-35 




Lower head limit (HH) X'OOOO' if type 1; X'OOnn' if typ 
(n=head limit) 


e 128 


54-57 


36-39 




EXTENT upper limit (CCHH) 




58-59 


3A-3B 




BB seek address: 
X'OOOO' if disk device 




60-63 


3C-3F 




EXTENT lower limit (CCHH) 




64 


40 




Record number: 1= Input; 0= Output 




65-67 


41-43 




Not used 




68-71 


44-47 




CCHH control bucket 
CCHH= X'00C80009 • if 231 1 - type 1 
CCHH=X'00C80013'if 2314 or 2319 - type 1 
CCHH=X'01940012'if 3330 - type 1 
CCHH=X'03280012' if 3330-11 - type 1 
CCHH= X'015C000B' if 3340 35MB 
CCHH= X'02B8000B ' if 3340 70MB 
CCHH=X'022B001D' if 3350 - type 1 




72 


48 




Record number 




73 


49 




Not used 




74-75 


4A-4B 




Not used 




76-80 


4C-50 




CCHHR bucket= extent lower limit and record number 




81-83 


51-53 




Not used 





I 



- current upper head number 



DTFPH (DAM FILES) 



Bytes 


Bits 


Function 


Dec 


Hex 


0-15 


0-F 




CCB 




16 


10 




X'08' indicates DTF relocated by OPENR. 




17-19 


n-13 




3X'00'. 




20 


14 




DTF type (X'23'). 




21 


15 



1 
2 
3 
4 
5 
6 
7 


Option codes. 

l=Output, 0=input. 

Not used. 

Not used. 

Not used. 

Not used. 

Not used. 

Not used. 

Not used. 




22-28 


16-lC 




Filename 




29 


ID 




Device type code : 
X'00' = 2311 
X'0r=2314, 2319 
X'04' =3330-1, -2 
X^05^= 3330-11 
XW^= 3350 
X'08' - 3340 general 
X'09' = 3340 35MB 
X'OA'= 3340 70MB. 




30-31 


1E-1F 




Logical unit address of first volume contair 
the file. 


ing 


32 


20 



1 
2 
3-7 


Not used. 

1= Device supports RPS. 
1= Version 3 DTF 
Reserved for future use 




33-35 


21-23 




Address of user label routine. 




36-39 


24-27 




Address of user routine to process EXTENT 


information. 



DTFPH (DISKETTE) 



Bytes 


Bits 


Function 


Dec 


Hex 


0-15 


0-F 




CCB. 


16 


10 





l=Dequeue old volume extents. 






1-3 


Not used. 






4 


1=DTF relocated by OPENR. 






5-7 


Not used. 


17-19 


11-13 




3X'00'. 


20 


14 




DTP type {X'21'). 
Open/close indicators. 


21 










0-2 


Not used. 






3 


1= Work area. 






4 


l=Not version 1 DTF table type. 






5 


l=Open; 0=Closed. 






6 


l=lnput ; 0=Output. 






7 


Not used. 


22-28 


16-lC 




Filename (see byte 29). 


29 


ID 




Device type code (3540=X'06'). 


30 


IE 




C'F'=EOF indicator for DTFPH. 


30-35 


IE -23 




(OCHROO) Address of HDRl label in VTOC 
(output). 


36-37 


24-25 




Volume sequence number. 


38 


26 




Open communications byte, 
input 









l=No more extents. 






1-3 


Not used. 






4 


l=New volume or new extent. 






5-7 


Not used. 
Output 








1 


l=No more extents. 
l=Extents for LiOCS at close. 






2-3 


Not used. 






4 


l=New volume on next extent. 






5 


l=Extents entered via console. 






6 


Not used . 






7 


l=Check extent for minimum of 2 tracb. 


39 


27 




Sequence number of current extent being opened. 


40 


28 




Sequence number of last extent opened (not a console 
extent entry). 


41-43 


29-2B 




Not used. 


44-47 


2C-2F 




Address of lOAREAl. 


48-51 


30-33 




Not used. 


52-53 


34-35 




X'OOOO'. 


54-57 


36-39 




Extent upper limit ( OCHR). 


58-59 


3A-3B 




Not used. 


60-63 


3C-3F 




Extent lower limit (OCHR). 


64 


40 




Record number, l^lnput, 0=Output. 


65-67 


41-43 




Not used. 


68-71 


44-47 




OCHR control bucket. 

OCHR= X'0049001A' for 3540 (output only). 


72 


48 




Record number. 


73 


49 




X'lO' - multivolume file (input) 

X'40' - last volume on multivolume file (input). 



I 



DTFPH (DISKEHE) (. . . Continued) 



Bytes 


Bits 


Function 


Dec 


Hex 


74 
75 
76-80 

81-83 


4A 
4B 
4C-50 

51-53 




Record size (maximum of 128) 

Not used. 

OCHR bucket = extent lower limit and record 

number (output). 

Not used. 



Bytes 


Bits 


Function 


Dec 


Hex 


0-15 


00-OF 




CCB. If RPS is supported, the CCW address in bytes 
9-1 1 (09-OB) is changed by OPEN to point to an 
RPS CCW string in the user virtual area. CLOSE 
restores it. 


16 


10 


0-1 


Not used. 






2 


COBOL open; ignore option. 






3 


Not used. 






4 


DTP table address constants relocated by OPENR. 






5-7 


Not used. 


17-19 


11-13 




Address of logic module. If RPS is supported, OPEN 
changes this address to point to an RPS version of the 
logic module in the system virtual area. CLOSE 
restores it. 


20 


14 




DTP Type =X ■33'. 


21 


15 




Open/Close indicators - X'02'=input, X'00'=output. 


22-28 


16-lC 




Symbolic filename. 


29 


ID 




DASD or diskette device indicators 

X'00'=2311 

X'01'=2314, 2319 

X'04'= 3330-1, -2 

X^05^= 3330-11 

XW^=3350 

X'08'=3340 general 

X'09'-3340 35MB 

X'OA '=3340 70MB. 


30-35 


IE -23 




DASD address of format-1 label. 


36-37 


24-25 




DASD or diskette volume sequence number. 


38 


26 




Open communications switch. 









l=No more extents —diskettes. 






1-3 


Not used. 






4 


Always 1 . 






5-7 


Not used. 


39 


17 




Sequence number of Current extent. 


40 


28 




Sequence number of last extent, or X'80' for 1442 
reader punch. 


41 


29 




Open indicator = X'20'. 


42 


2A 




Device type indicators : 








1 


Unused. 

1=DTF has been extended into the partition GETVIS 

area. 






2 


1=DASD 






3 


l=tape 






4 


l=printer 






5 


l=punch 






6 


l=reader 






7 


1=RPS supported. 


43 


2B 




Logic module device indicators : 
X'F3' = DASD or diskette device. 
X'FT = reader or tape device. 
X'FO' = other type devices. 



I 



DTFDI (...Continued) 



Bytes 


Bits 


Function 


Dec 


Hex 


44 


2C 




Logic module option switches 








1 


l=input, O=output. 

l=eiect for RDR-PCH; 0=no eject. 






2 


l=not first pass; 0=first pass. 






3 


l=two I/O areas; O=one I/O area. 






4 


1=2540 Punch. 






5 


1=SYSLST/SYSPCH. 






6 


l=Tape SYSLST/SYSPCH. 






7 


1=ASCII ; 0=EBCDIC code. 


45-47 


2D-2F 




Alternate I/O area address. 


48 


30 


0-1 


Reserved for future use. 






2 


1= Version's DTP. 






3-7 


Reserved for future use. 


49-51 


31-33 




Reserved for future use. 


52-53 


34-35 




Extent lower head limit. 


54-57 


36-39 




Extent upper head limit. 


58-64 


3A-40 




DASD seek address. 

Diskette seek address at byte 60 (3C). 


65-67 


41-43 




Users EOF address. 


68-72 


44-48 




Control bucket CCHHR. 

Byte 72 (48) always X'OT for diskettes. 


73 


49 




Logic module switches 

X'Or=input 

X'00'=output 

X'00'=both input and output on diskettes. 


74-75 


4A-4B 




Logic module constants 
X'0020' DASD output 
X'0018' DASD input 
X'0008' Diskette devices 
X'OOOO- Non-DASD devices. 


76-80 


4C-50 




Count field CCHHR (OCHRO for diskettes). 


81 


51 




Key length. 


82-83 


52-53 




Data length. 


84-87 


54-57 




Instruction to load lOREG with correct I/O area 
address . 


88-103 


58-67 




Seek, Search CCWs. 

Seek, Read/Write CCW f or diskette files. 


104-111 


68-6F 




TIC CCW. 

NOP CCW for diskette output files; unused for 

diskette input files. 


112-119 


70-77 




Input/output CCW. 


120-127 


78-7F 




Second output CCW. 


128-151 


80-97 




Verify CCWs for output. 


152-159 


98-9F 




Error CCWl . 


160-167 


A0-A7 




Error CCW2. 


168-231 


A8-E7 




Save area (64 bytes). 


232-235 


E8-EB 




DC A(WLRERR) if WLRERR=Address. 
B 28(15) if ERROPT=omitted. 
B 25(15) if ERR0PT=SK1P. 
B 28(15) if ERROPT=lGNORE. 



DTFCP (DISK^YES) 



Bytes 


Bits 


Function 


Dec 


Hex 


236-239 


EC-EF 




DC A(ERROPT) if ERROPT=Addre5s. 
B0(15)if ERROPT=omitted. 
B24(15)if ERROPT=SKIP. 
B 28(15) if ERROPT=lGNORE. 


0-15 


00-OF 




CCB. If RPS is supported, the CCW address in bytes 
9-1 1 (09-OB) is changed by OPEN to point to an RPS 
CCW string in the user virtual save area. CLOSE 
restores it. 


16 


10 




1 


Not used 

Set by Maint; indicates that LIOCS must retrieve 

extents from the VTOC instead of the label cylinder. 






2 


COBOL open; ignore option. 






3 


X'lO' indicates an unlabeled FORTRAN tape. 






4 


DTF table address constants relocated by OPENR. 






5 


Used by FORTRAN (Sequential Disk Backspace and 
Rewind). 






6 


1 = ASCII, = EBCDIC. 






7 


FORTRAN is calling DTFCP. 


17-19 


11-13 




Logic module address. If RPS is supported, OPEN 
changes this address to point to an RPS version of the 
logic module in the system virtual save area. CLOSE 
restores it. 


20 


14 




DTF type X'32' except in the case of disk assigned to 
units SYSOOO to SYSnnn. In this case, a DTFCP open 
phase changes it to X'20'. 


21 


15 




Open indicators : X'02' input, X'OO' output, except 
for tapes assigned to SYSOOO to SYSnnn when 
X'OO' = input and X'08' is output. 
X'08' DISK=YES indicator. 









1 = no rewind, - rewind. 


22-28 


16-lC 




Filename (see byte 29). 


29 


ID 




Device type code : 
X'OO' = 2311 
X'01' = 2314, 2319 
X'04' =3330-1, -2 
X-05'= 3330-11 
X'07^= 3350 
X'08' = 3340 general 
X'09' = 3340 35MB 
X'0A' = 3340 70MB. 


30-35 


IE -23 




File address for disk; block count if bit 7 of byte 16 


36-37 


24-25 




is on. 

Volume sequence number or work area. 


38 


26 




Open switch 


39 


27 




Sequence number of current extent. 


40 


28 




Sequence number of last extent, or X'80' if 1442 punch. 


41 


29 




X'BO' indicates request for standard label tape OPEN. 


42 


2A 




X'80' device is a 2560. 

X'40' DTF has been extended into the user virtual 
save area 



I 



DTFCP (DISK=YES) (...Continued) 



Bytes 


Bits 


Function 


Dec 


Hex 


42 


2A 




X'20' device is a DASD 
X'lO" device is a tape 
X'08' device is a printer 
X'04' device is a punch 
X'02' device is a reader 
X'OT RPS is supported. 


43 


2B 




X'F3' device is a DASD 
X'FT device is a reader 
X'FO' device is other type. 


44 


2C 




1 


l=input, O=output. 

l=eject needed for a reader punch; 0=no eject. 






2 


0=first pass, l=not first pass. 






3 


l=two I/O areas, 0=one I/O area. 






4 


1=2540 punch. 






5 


1=SYSLST or SYSPCH. 






6 


1=SYSLST or SYSPCH on output tape. 






7 


l^TLBL is present and tape is labeled. 


45-47 


2D-2F 




IOAREA2 address. 


48 


30 




1 


1= Always on. 
Reserved for future use. 






2 


1= Version 3 DTF 






3-7 


Reserved for future use. 


49-51 


31-33 




Reserved for future use. 


52-53 


34-35 




Lower head limit. 


54-57 


36-39 




Extent upper limit. 


58-64 


3A-40 




BBCCHHR seek address. 


65-67 


41-43 




EOF address. 


68-71 


44-47 




Control bucket CCHH. 


72 


48 




Number of record per track for output, number of 
record per track +1 for input. 


73 


49 




X'OO' for output, X'Or for input. 


74-75 


4A-4B 




X'002O' for output, X'0018' for input for DASD 
X'0008' for 2560 and 5424/5425 output. 
X'OOOO' for nondisk device. 


76-80 


4C-50 




CCHHR for count field. 


81 


51 




Key length. 


82-83 


52-53 




Data length. 


84-87 


54-57 




Instruction to load user i/O area address to I/O 
register. 


88-111 


58-6F 




Seek, search, TIC CCWs, 


112-119 


70-76 




CCW for DASD input and first CCW for DASD output. 
This CCW can be used for other device if unit is not 
a DASD 


End-of-t 


able If DTP 


is define 


d for an input file 


120-127 


77-7F 




Second CCW for output. 


128-151 


80-97 




Verify CCWs for output. 



DTFCP (DISK=YES) (...Cor 



Bytes 


Bits 


Function 


Dec 1 Hex 


End-of-table if DTF is defined for output file and DEVADDR does not equal SYSPCH. 


152-159 
160-167 
168-231 


98-9F 
A0-A7 
A8-E7 




2540 punch error recovery CCW 1 . 
2540 punch error recovery CCW 2. 
Reserved. 


When the CP open initializes the table and determines that the device is a 2540 punch, 
the following bytes in the table are changed : 


30 

32-35 

48-55 

56-63 

64-71 

72-151 

152-231 


IF 

20-23 

30-37 

38-3F 

40-47 

48-97 

98-E7 




X'FF' indicator to DTFCP open phases and logic module. 

Instruction to load user I/O area to I/O register. 

CCW. 

2540 punch error recovery CCW 1 , 

2540 punch error recovery CCW 2. 

80-byte card image, savearea 1.. 

80-byte card image, savearea 2. 


When the CP open initializes the table and determines that the device is a 2560 or 
5424/5425, the following bytes in the table are changed: 


32-35 

48-55 

56-63 

64 

65 


20-23 

30-37 

38-3F 

40 

41 




Instruction to load user l/O area to I/O register. 

First output CCW. 

Second output CCW. 

Stacker select character V for ASCII. 

Stacker select character W for EBCDIC. 



I 



DTFCP (DISKHMO) 



Bytes 


Bits 


Function 


Dec 


Hex 


0-15 


00-OF 




CCB. 


16 


10 


0-1 


Not used. 






2 


COBOL open; ignore option. 






3 


Not used. 






4 


DTF table address constants relocated by OPENR. 






5 


Not used. 






6 


1=ASCII (used only if DISK=YES), 0-EBCDIC 
(used only if DISK=YES). 






7 


FORTRAN is calling DTFCP. 


17-19 


11-13 




Logic module address. 


20 


14 




DTF type X'32' except in the case of tape assigned 
to units SYSOOO to SYSnnn. In this case, a DTFCP 
open phase changes it to X'lO'. 


21 


15 




Open indicators X'02' input, X'OO' output (except 
for tapes assigned to SYSOOO to SYSnnn when it is 
X'OO' input, X'08' output). 


22-28 


16-lC 




Filename (see byte 29). 


29 


ID 




Reserved for future use . 


30 


IE 




Indicator to DTFCP open phase and logic module. 
X'FF' for input files. 
X'OO' for output files. 


31 


IF 




Reserved for future use . 


32-35 


20-23 




Instruction to load user's I/O area address into 
I/O register. 


36-37 


24-25 




Volume sequence number or work area. 


38 


26 




Open switch. 


39 


27 




Sequence number of current extent. 


40 


28 




Sequence number of last extent, or X'80' if 1442 punch. 


41 


29 




X'20'. 


42 


2A 




X'80' device is a 2560. 
X'40' device is a 5424/5425. 
X'lO' device is a tape. 
X'08' device is a printer. 
X'04' device is a punch. 
X'02' device is a reader. 


43 


2B 




X'Fl' device is a reader or tape. 
X'FO' device is other type. 


44 


2C 




1 


l=input, O=output. 

l=eject needed for a reader-punch, 0= no eject. 






2 


l=not first pass, 0=first pass. 






3 


l=two I/O areas, O=one I/O area. 






4 


1=2540 punch. 






5 


1=SYSLST or SYSPCH. 






6 


1=SYSLST or SYSPCH on output tape. 






7 


Reserved for future use. 


45-47 


2D-2F 




IOAREA2 address. 


48-55 


30-37 




CCW. 


End-of-t 


□ble if DTF 


is define 


d as output file and DEVADDR is not equal to SYSPCH. 



DTFCP (DISK=NO) (...Continued) 



Bytes 


Bits 


Function 


Dec 


Hex 


56-63 
64-71 
65-67 


38-3F 
40-47 
41-43 




2540 punch error recovery CCW 1 . 
2540 punch error recovery CCW 2. 
EOF address, input only. 


End-of -table if DTF is defined as input file 


72-151 
152-231 


48-97 
98-E7 




80-byfe card image, save area 1. 
80-byte card image, save area 2, 


If the device is a 2560 or 5424/5425, bytes 56 onward contain ttie following information. | 


56-63 

64 

65 

66-75 

76-235 

236-237 

238-317 

318-319 


38-3F 

40 

41 

42-4B 

4C-EB 

EC-ED 

EF-13D 

13E-13F 




Second output CCW. 

Stacker select character V for ASCII. 

Stacker select character W for EBCDIC. 

Reserved for future use. 

First I/O area. 

Reserved. 

Second I/O area. 

Reserved. 



I 



DTFCP (DISK=PARAMETER OMITTED) 



Byfes 


Bits 


Function 


Dec 


Hex 


0-15 


00 -OF 




CCB 


16 


10 


0-1 


Not used. 






2 


COBOL open; ignore option. 






3 


Not used. 






4 


DTF table address constants relocated by OPENR. 






5 


Not used. 






6 


1=ASCII (used only if DISK=YES), 0-EBCDIC 
(usedonly if DISK=YES). 






7 


Used by FORTRAN 


17-19 


11-13 




Logic module address. 


20 


14 




DTF type X'3r except in the case of tape assigned to 
units SYSOOO to SYSnnn. In this case DTFCP open 
phase changes it to X'lO'. 


21 


15 




Open indicators X'02' input, X'OO' output (except for 
tapes assigned to SYSOOO to SYSnnn when it is X'OO' 
input, X'08' output. 


22-28 


16-lC 




Filename. 


29 


ID 




Reserved for future use. 


30 


IE 




X'OO' indicator to DTFCP open phases and logic 
module. 


31 


IF 



1 


l=input, O=output. 

l=eject needed for a read punch, 0=no eject. 






2 


l=not first pass, 0=first pass. 






3 


l=two I/O areas, 0=one I/O area. 






4 


1=2540 punch. 






5 


1=SYSLST or SYSPCH. 






6 


1=SYSLST or SYSPCH on output tape. 






7 


1=TLBL specified and tape is labeled. 


32 


20 




Open indicators. 


33-35 


21-23 




IOAREA2 address. 


36-39 


24-27 




Instruction to load user's I/O area address into 
I/O register. 


40-47 


28-2F 




CCW. 


End of ta 


3le if DTF 


s definec 


as output file and DEVADDR is not equal to SYSPCH. 


48-55 


30-37 




2540 punch error recovery CCW 1 , 


56-63 


38-3F 




2540 punch error recovery CCW 2. 


57-59 


39-3B 




EOF address, input only. 


End of to 


3le if DTF • 


s definec 


as input file. 


64-143 


40-8F 




80-byte card image, save area 1. 


144-223 


90-1 3F 




80-byte card image, save area 2. 



DTFCP (DISK=PARAMETER OMITTED) 



Bytes 


Bits 


Function 


Dec 1 Hex 


For 2560 and 5424/5425, bytes 48 onwards contain the following information: 


48-207 
208-209 
210-369 
370-371 
372-451 


30-CF 

DO-Dl 

D2-171 

172-173 

174-1C3 




lOAREAl. 
Reserved 
IOAREA2. 
Reserved 
Compare area . 



DTF - Table Types 



DTF Type Code 






(Byfe 20) 






of DTF Table 


DTF 


Description 


X'OO- 


DTFCD 


Combined files 


X'Ol' 


DTFPT 


Paper tape files 


X'02' 


DTFCD 


Reader and 3881 Optical Mark Reader files 


X'03' 


DTFCN 


Console 


X'04' 


DTFCD 


Punch files 


X'05' 


DTFCD 


Reader files on 2560, 5425 


X'07' 


DTFPR 


Printer files on 2560 


X'08' 


DTFPR 


Printer files 


X'09' 


DTFOR 


Optical Reader files except 3881 and 3886 files 


X'OA' 


DTFOR 


Optical Reader files (HEADER=YES) 


X'OB' 


DTFMR 


Magnetic Ink Character Recognition (MICR) 
and Optical Reader/Sorter files 


X'OC 


DTFDR 


3886 Optical Character Reader files 


X'lO' 


DTFMT 


Magnetic tape workfiles 




DTFCP 


Magnetic tope workfiles (compiler). (Note 1) 


X'll' 


DTFMT 


Nonstandard or un lobe Id tape files 


X'12' 


DTFMT 


Standard labeled, output tape files 




DTFPH 


Standard labeled, output tape files 
(physical IOCS) 


X'13' 


DTFMT 


Standard labeled, input tape files (read backward) 


X'14' 


DTFMT 


Standard labeled, input tape files (read forward) 


X'lA' 


DTFDU 


Diskette Input/Output Unit files 


X'20' 


DTFSD 


Sequential DASD workfiles and data files 




DTFCP 


DASD workfiles (compiler) 


X'21' 


DTFPH 


Sequential DASD files, MOUNTED=S INGLE 
(physical IOCS) 


X'22' 


DTFDA 


Direct access files 


X'23' 


DTFPH 


Direct access files, MOUNTED=ALL (physical 
IOCS) 


X'24' 


DTF IS 


Indexed sequential, LOAD file 


X'25' 


DTF IS 


Indexed sequential, ADD file 


X'26' 


DTFIS 


Indexed sequential, RETRVE file 


X'27' 


DTF IS 


Indexed sequential, ADDRTR file 


X'28' 


ACB 


Access Method Control Block for VSAM 


X'30' 


DTFCP 


Compiler file for DOS Version 1 (Note 1) 


X'31' 


DTFCP 


Compiler file for DOS Versions 2 onward 


X'32' 


DTFCP 


Compiler file for DOS Versions 2 onward (Note 2) 


X'33' 


DTFDI 


Device independent system unit files 


X'40' 


DTFBT 


Basic Telecommunication Access Method (BTAM) 
file (Note 3) 


X'50' 


DTFOT 


Queued Telecommunication Access Method 
(QTAM) file (Note 3) 


X'60' - X'67' 







DTF type is X'30' except for tape or DASD assigned to units SYSOOO to 
SYSnnn. In this cose, the DTFCP open phases change the DTF type to 
X'lO' for tope workfiles, or X'20' for DASD workfiles. 



DTF - Table Types ( Continued) 



Notes (continued) 

2. DTF type is X'32' except for DASD assigned to units SYSOOO to SYSnnn. 
In this case, the DTFCP open phases change the DTF type to X'20' for 
DASD workfiles. 

3. The following control unit codes are ORed into the low-order 4 bits of 
the DTF type code. 



Control Unit 


Cod( 


7770 


1 


2848 


3 


2701 


4 


2702 


5 


2703 


6 



I 



RPS DTF/MODULE RELATIONSHIP 



Before OPEN 




RPS 
MOD 



RPS DTF-Extentlon 



(X'OO') 



RPS Channel Program 
(Variable length) 



Work space 



172 (X'AC) 

Sector values (up to 4) (except ISAM) 



176 (X'BO') 

Address of original channel program 



180 (X'B4') 

Address of original logic module 



184(X'B8') 



72 Byte Register Save Area 



256(X"100') 



Additional Work Space 
256 bytes for DAM 
128 bytes for ISAM 
(This field is not present for SAM or Device Independence) 



IU-111 



CHAPTER IV 

DOS/VSE SUPERVISOR CONTROL BLOCKS AND AREAS 



SUPERVISOR STORAGE ALLOCATION 



Gener- 
ation 
Macro 



Macros 
Called 



Generated Code 



Hardware/Software Interface (PSW's, 
Areas, etc.). 



Interrupt Handler, Job Accounting In-line 
Routine. 



Various SVC Routines. 



Various Constants and Tables must be below 
8 K. CRTGEN, RIB Tables, Exit Tables, 
I/O Tables, Foreground Communication Regions 
etc., having Y-Type Address Pointers in Low 
Storage, must be below 32 K. 



External Interrupt Handler. 



C-Transient, B-Transient, and A-Transient Area 



FTTAB and SSLD Initialization. 



Task Selection. 



Fetch Data Section (CCWs, Control Blocks). 



Fetch Overall Logic and Directory Search. 



CCW Translation for 370 Mode. 



CCW Analysis and Fixing Routine for ECPS:VSE 
Mode. 



Program Check Handler. 



Page Manager. 
(SGPLLEV) Load Leveller. 
(SGPFIX) Fixing Routines. 
(SGPOPT)PageinSVCs. 
(SGPDATA) Data for Page Manager. 



Various SVC Routines. 



Machine/Channel Check Handler, RTA. 



RPS Convert Routine. 



SVCO (EXCP) and SVC 15 (SYSIO) Routines. 
(SGSCHED) Channel Scheduler Routine. 
(lOINTER) I/O Interrupt Handler 
(SGDSK) Disk Error Recovery Routine. 
(SGSERI) Service Task Interface and Data. 



Fetch SVC Routines. 



Interface to ERP Transients. 



Asynchronous Processing SVC Routines. 



Resource Management SVC Routines. 



USE, RELEASE Routines. 



CDLOAD, GETVIS, and FREEVIS Routines. 



IDRA Area and Program Fetch. 



Allocate and Setlimit SVC Routines. 



Get/Free Real Storage for 370 



AVR Task and SVC Routines. 



Cross Partition Common SVC Routin 



GETJA SVC Routine. 



Logical SV/PP Common SVC Routines. 



Tables having A-Type Address Pointers in low 
Storage (CRTSAV, SDAGDT, ISTAVT). 



Registers 
Used 



I 



R9 
R15 



R13 
R13 
R9 
R13 
R12 



IPL Initialization Routine. 
CCW Translation Copy Buffers. 
DSECT Macros etc. 



Other generation macros like PIOCS, FOPT, etc. only set globals but do not generate code. 
IV-01 



SUPERVISOR CALLS 



SVC 


Macro supported 


Function 


Dec 


Hex 








EXCP 


Execute Channel Program. 


1 


1 


FETCH 


Fetch any phase. 


2 


2 




Fetch a logical transient (B-transient). 


3 


3 




Quiesce I/O 


4 


4 


LOAD 


Load any phase. 


5 


5 


MVCOM 


Modify supervisor communication region (if issued 
by MVCOM macro). 

Fetch another physical transient (if issued by a 
physical transient). 


6 


6 


CANCEL 


Cancel a problem program or task. 


7 


7 


WAIT 


Wait for a CCB (or lORB) or TECB. 


8 


8 




Transfer control to the problem program from a 
logical transient (B-transient). 


9 


9 


LBRET 


Return to a logical transient (B-transient) from the 
problem program after an SVC 8. 


10 


A 


SETIME 


Set timer interval. 


11 


B 




Return from a logical transient (B-transient). 


12 


C 




Reset PCIL being condensed bit (displ. 59 in 
COMREG). 


13 


D 




Set PCIL being condensed bit (displ. 59 in 
COMREG). 


14 


E 


EOJ 


Cancel job and go to job control for end of job step. 


15 


F 


SYSIO 


Headqueue I/O request and execute channel 
program. 


16 


10 


STXIT(PC) 


Provide supervisor with linkage to user's PC routine 
for program check interrupts. 


17 


11 


EXIT(PC) 


Return from user's PC routine. 


18 


12 


STXIT(IT) 


Provide supervisor with linkage to user's IT routine 
for interval timer interrupts. 


19 


13 


EXIT(IT) 


Return from user's IT routine. 


20 


14 


STXIT(OC) 


Provide supervisor with linkage to user's OC routine, 
forexternalorattention interrupts (operatorcomm.). 


21 


15 


EXIT(OC) 


Return from user's OC routine. 


22 


16 




Seize/Release system; 

Enable/disable external and I/O interrupts; 

Set key in user's PSW. 


23 


17 




Store the load address of a phase at a defined user 
address. 


24 


18 


SETIME 


Set timer interval and provide supervisor with link- 
age to user's TECB, if any. 


25 


19 




Issue HALT I/O on a teleprocessing device, or 
HALT I/O on any device if issued by OLTEP. 
Dequeued an unstarted OLTEP I/O request 
to a shared device. 


26 


1A 




Validate address limits. 


27 


IB 




Issue an HIO for a telecommunication device with- 
out dequeueing the CCB. 


28 


1C 


EXIT(MR) 


Return from user's stacker select routine (MICR 
type devices only). 


29 


ID 


WAITM 


Provide support from multiple wait macro WAITM. 


33 


21 


COMRG 


• Force task select for system tasks. 


•34 


22 


GETIME 


Provides Time-of-Day and updates the DATE field. 


35 


23 




Hold a track for use by the requesting task only. 


36 


24 


FREE 


Free a track held by the task issuing the FREE. 



SUPERVISOR CALLS (. . . Cont'd) 



SVC 


Macro supported 


Function 


Dec 


Hex 


37 


25 


STXIT(AB) 


Provide supervisor with linlogeto user's AB routine 
for abnormal termination of a task. 


38 


26 


ATTACH 


Initialize a subtasl< and establish its priority. 


39 


27 


DETACH 


Perform normal termination of a subtask. It in- 
cludes calling the FREE routine to free any tracks 
held by the subtask. 


40 


28 


POST 


Inform the system of the termination of an event 
and ready any waiting tasks. 


41 


29 


DEQ 


Inform the system that a previously enqueued re- 
source is now available. 


42 


2A 


ENQ 


Prevent tasks from simultaneous manipulation of a 
shared data area (resource). 


44 


2C 




Support the creation of unit check records from 
outside the A- or R-transient area. 


45 


2D 




Provide emulator interface. 


46 


2E 




Provide OLTEP with the facility to operate in 
supervisory state. 


47 


2F 


WAITF 


Provide support for multiple wait macro WAITF 
for MICR type devices. 


48 


30 




Fetch a CRT transient. 


49 


31 




Used by VTAM to init. exec, of channel program 


51 


33 


HIPROG 


Make directory entry information for a phase avail- 
able to the requesting task. 

Calculate the highest address of an overstructure of 
phase and store it in the COMPREG. 


52 


34 


TTIMER 


Return the remaining time interval, or cancel a 
time interval. 


53 


35 




Used by VTAM/ACF to schedule user exit in applic. 
program. 


54 


36 




Replease page frames to selection pool. 
Applies only to 370 mode of operation. 


55 


37 




Allow SDAID to acquire processor storage needed 
for program initialization (applies only 370 mode 
of operation). 


56 


38 




Support the POWER/VS-CP interface when DOS/ 
VSE operates under VM/370 (applies only 370 
mode of operation). 


57 


39 


GETPRTY 
SETPRTY 


Return partition priorities to the requesting task. 
Change partition priorities as specified. 


58 


3A 


INVPART 


Initialize partition. 


59 


3B 


INVPAGE 


Initialize Tables or invalidate pages. 


60 


3C 


GETDADR 


Provide virtual address of location within I/O areas 
for ERP and CRT routines. 


61 


3D 


GETVIS 


Request allocation of storage within the same 
partition or within the SVA. 


62 


3E 


FREEVIS 


Free storage requested through a GETVIS macro. 


63 


3F 


USE 


Use a resource. 


64 


40 


RELEASE 


Release a resource. 


65 


41 


CDLOAD 


Load a phase in the requesting partition's GETVIS 
area unless that phase is already in the SVA. 


66 


42 


RUNMODE 


Return mode which program is running. 


67 


43 


PFIX 


Fix page(s) in real storage. 


68 


44 


PFREE 


Free page(s) in real storage. 


69 


45 


REALAD 


Return real address corresponding to a given virtual 
address. 



I 



SUPERVISOR CALLS (. . . Cont'd) 



SVC 


Macro supported 


Function 


Dec 


Hex 


70 


46 


VIRTAD 


Return virtual address corresponding to a given real 
address. 


71 


47 


SETPFA 


Establish or terminate the linkage between the 
supervisor and an user page-fault appendage routine. 


72 


48 


GETCBUF/FEECBUF 


Get or free copy buffer for IDAL or tape ERP. 


73 


49 


SETAPP 


Allow linkage to channel and appendage routines. 


74 


4A 




Fix page(s) in real storage for restart. 


75 


4B 


SECTVAL 


Calculate a sector value (diskdev. with RPS feature) 


76 


4C 




Initiate recording on SYSREC file. 


11 


4D 


TRANSCSW 


Return the virtual address of an ERP CCW address 
copied from the pertinent CSW. 


78 


4E 


CHAP 


Change subtask priority (supported if AP=YES). 


79 


4F 


SYNCH 


Give control to synchronous exit. 


80 


50 


SETT 


Set task time interval. 


81 


51 


TESTT 


Return the remaining task time interval or cancel a 
time interval. 


82 


52 




Reserved. 


83 


53 


ALLOCATE 


Allocate real or virtual partitions. 


84 


54 


SETLIMIT 


Set partition sizes. 


85 


55 


RELPAG 


Release contents of one or more pages. 


86 


56 


FCEPGOUT 


Force a page-out of one or more pages. 


87 


57 


PAGEIN 


Page-in one or more pages. 


88 


58 


TPIN 


Start TP Balancing. 


89 


59 


TPOUT 


Stop TP Balancing. 


90 


5A 


PUTACCT 


Provide interface with POWER/VS for additional 
account information (by user). 


91 


58 




Provide interface with POWER/VS for standard 
account information. 


92 


5C 


XECBTAB 


Define, delete, or check an entry in the cross 
partition ECB table. 


93 


5D 


XPOST 


Set the traffic bit in a cross-partition ECB and 
ready any waiting tasks. 


94 


5E 


XWAIT 


Wait for a cross-partition ECB to be posted. 


95 


5F 


EXITAB 


Return from an user's abnormal termination routine. 


96 


60 


EXIT{TT) 


Return from user's task timer exit. 


97 


61 


STXIT{TT) 


Provide supervisor with linkage to user's task timer 
exit routine for task time interval end. 


98 


62 


EXTRACT 
MODCTB 


Extract system control information. 
Modify a PUB 2 table entry. 


99 


63 


GETVCE 


Return a specific volume characteristics table entry. 


100 


64 


PFIX 
PFREE 


Fix or free a page in the system GETVIS area. 


101 


65 


MODVCE 


Update the volume characteristics table. 


102 


66 


GETJA 


Update the fields in the requesting partition's job 
accounting table. 


103 


67 




Execute I/O operations for SYSFIL on a FBA 
device. 


104 


68 


EXTENT 


Build, return, or delete DASD extent information. 


105 


69 


SUBSID 


Accept, return, and delete subsystem identification 
information. 



COMMAND CONTROL BLOCK (CCB) 



Count 


Trans- 


CSW 


Type 


Reserved 


CCW 


Reserved 


CCW 


Optional 




mission 


Status 


Code 


for logical 


Address 


for 


Address 


Sense 




Informa- 


Bits 


and 


IOCS or 




physical 


in CSW 


CCW 




tion 




logical 


3895 




IOCS 






1 


2 3 


4 5 


6 Unit 7 


PIOCS 8 


9 11 


12 


13 15 


16 23 



Used for residual 
Count. 



Transmitting in- 
formation between 
PhysicallOCS& 
Problem Program 



Used by BTAM to indicate the numer of copy blocks needed 
at channel end appendage time (370 mode only). 



BitO: Traffic Bit (Wait) 
(Note 5) 

Biti: End of File {/• or /&) 

PRT1 UCSB Parity Check (Line Complete) 
(Note 2) 

Bit 2: Unrecoverable I/O error 

Bit 3: Accept unrecoverable I/O error 

Bit 4: Return DASD Data Checks Diskette Data 
Checks, 2671 errors, or 1017/1018 errors 
to the user; indicate actiontype messages for 
DOC; Return 5424/5425 not ready. 

Bit 5: Post at Device End (Note 5) 

Bit 6: Return Tape Read Data Check; 1018 or 
2560 Data Check; 2520, 2540, 2560, 
3881 or 5424/5425 Equipment Check; 
Accept 3504, 3505 or 3525 Perm. Error; 
DASD Data Chechs on Read or Verfiy 
Command on 3203, PRT1, or 5203 Pass- 
back Requested. 
(Notes 3, 6, 8 and 10) 

Bit 7: User Error Routine (Note 9) 



Byte 3 



Bit 0: DASD Data Check in Count Area; 

Permanent Error for 3330, 3340 or 3350 
MICR-SCU Not Operational; 1287/1288 
Data Check; 3203, PRT1 , or 5203 Print 
Check/Equipment Check; 3540 Special 
Record Transferred. 

Bit 1 : DASD Track Overrun; MICR Intervention 
required; 1287-Keyboard Correction in 
Journal Tape Mode; 1017-Broken Tape 
PRT1 -Print Quality/Equipment Check. 

Bit 2: DASD End of Cylinder; MICR- (Note 4) 
1 287/1 288-Hopper Empty in Document 
Mode. PRT1/2245 Line Position Error. 
(Note 7) 

Bit 3: 2520, 2540, 3881 -Equipment Check; 2560 
3203, 5203, 5424/5425 Data Check/ 
Equipment Check; Tape Read Data Check; 
DASD-Any Data Check; 1287-Equipment 
Check; 1017/1018 Data Check; PRTI-Print 
Check/Data Check; 3504, 3505, 3525 Perm. 
Error (Note 8); Diskette Data Check. 

Bit 4: Non-Recovery Questionable Condition: 

Card-Unusual Command Sequence DASD- 
No Record Found 1 287/1 288-Document 
Jam or Torn Tape; PRT1-UCSB Parity Check 
(Command retry); 5424/5425 Not Ready. 

Bit 5: No Record Found Condition (Retry on 
Disk Devices). 



Set on by: 



PIOCS 
Pr. Pr.** 
Pr. Pr. 



Set on by: 



I 



Physical IOCS 
' Problem Program 



COMMAND CONTROL BLOCK (CCB) (. . . Cont'd) 



Trans- 
mission 
Informa- 
tion 



CSW 

Status 

Bits 



Type 
Code 



logical 



Reserved 
for logical 
IOCS or 
3895 



5 6 Unit 7 PIOCS 8 9 



CCW 
Address 



Reserved 
for 

physical 
IOCS 
12 



CCW 
Address 
in CSW 



Optional 

Sense 

CCW 



2-3 (. . . Cont'd) 



Bit 6: Carriage Channel 9 Overflow or Verify 
Error for DASD; 1287-Document Mode- 
Late, Stacker Select; 1288-End of Page. 

Bit 7: Command Chaining, Retry from the next 
CCW to be executed. 



CSW Status Bits 



Byte 4 (Note 1) 



Attention 
Status Modifier 
Control Unit End 
Busy 

Channel End 
Device End 
Unit Check 
Unit Exeption 



Program Controlled 
Interruption 
Incorrect Length 
Program Check 
Protection Check 
Channel Data Check 
Channel Control Check 
I nterf. Control Check 
Chaining Check 



Type Code and 
Logical Unit 



Byte 6 



X'Ou* Original CCB 

X'08' Physical addressing is requested. Byte 7 contain the PUB 

index. 

X'2u' Translated CCB 

X'4u' BTAM request original CCB 

X'6u' BTAM request translated CCB 

X'8u' User-translated CCB in virtual partition 

u: = The address in byte 7 refers to a System Logical Unit. 
1 = The address in byte 7 refers to a Programmer Logical 
Unit. 



Hexadecimal representation of SYSnnn: 



SYSRDR 

SYSIPT 

SYSPCH 

SYSLST 

SYSLOG 

SYSLINK 

SYSRES 

SYSSLB 

SYSRLB 

SYSUSE 



= 02 
= 03 
= 04 
= 05 
= 06 
= 07 
= 08 
= 09 



SYS R EC = OA 
SYSCLB = OB 
SYSVIS = OC 
SYSCAT = OD 
SYSOOO = 00 
SYS001 = 01 
SYS002 = 02 



Reserved for 
Logical IOCS or 
3895 PIOCS 
(Note 10) 



Buffer Offset: 
ASCII Input Tapes 

ASCII Output Tapes Fixed 

Variable 

Undefined 

2501 Double CCW-Support 

SNS Task I/O Request 



X'00'-X*63' 

X'OO- 

X'OO- or X'04' 

X'OO' 

X*80' (2501 Double-CCW Support 

is active) 
X'80' (I/O Error on Alternate 

Channel) 



9-11 CCW Address 



Virtual or real address of CCW associated with this CCB depending 
on byte 6: 

Real address if byte 6 = X'2u', X'6u', or X'8u'; 
Virtual address if byte 6 = X'Ou', or X'4u'. 



COMMAND CONTROL BLOCK (CCB) (. . . Cont'd) 



Count 


Trans- 


CSW 




Type 


Reserved 


CCW 


Reserved 


CCW 


Optional 




mission 


Status 




Code 


for logical 


Address 


for 


Address 


Sense 




Informa- 


Bits 




and 


IOCS or 




physical 


in CSW 


CCW 




tion 






logical 


3895 




IOCS 






1 


2 3 


4 


5 


6 Unit 7 


PIOCS 8 


9 11 


12 


13 15 


16 23 




Byte(s) 


Description 


12 Reserved for 


X"80' CCB being used by ERP 


Physical IOCS 


X'40' Channel Appendage Routine present for TP Device, 




VSAMorPOWER/VS 




X'20' Sense Information desired (Note 3) 




X'10* Message writer 




X'08' EU Tape Error 




X'04' OLTEP Appendage available 




X'02' Tape ERP Read Opposite Recovery 




X'OT Reserved 


13-15 CCW Address in 


Virtual Address of CCW pointed to by CSW at Channel End 


CSW 


(if byte 6 = X'8u', it ist the real address) or address of the Channel 




End Appendage Routine for TP devices, VSAM or POWER/VS. 


16-23 Optional Sense 


8 bytes appended to the CCB when Sense Information is desired. 


CCW 





Note 1 : Bytes 4 and 5 contain the status bytes of the Channel Status Word (Bits 32-47). if 
byte 2, bit 5 is on and device end results as a separate interrupt, device end will be 
OR-ed into CCB byte 4. 

Note 2: Indicates /* or /& statement on SYSRDR or SYSIPT. Byte 4, bit 7 (unit exception) is 
also on. 

Note 3: DASD data checks on count not returned. 

Note 4: For 1255/1259/1270/1275/1419, disengage. For 1275/1419D, I/O Error is external 
interrupt routine (Channel data check or bus-out check). 

Note 5: The traffic bit (Byte 2, bit 0) is normally set on at channel end to signify that the 

I/O was completed. If byte 2, bit 5 has been set on, the traffic bit and bits 2 and 6 in 
byte 3 will be set on at device end. Also see Note 1 . 

Note 6: 1018 ERP does not support the Error Correction Function. 

Note 7: This error occurs an equipment check, data check or FCB parity check. For 2245, this 
error occurs as a data check or FCB parity check. 

Note 8: For 3504, 3505, 3525 input or output files using ERROPT, byte 3, bit 3 is set on if a 
permanent error occurs. Byte2, bit 6 is set on to allow you to accept permanent errors. 

Note 9: If user error routine is specified and the user needs the sense information to further 

process the error, byte 12, bit 2mustalosbeset. Otherwise, the supervisor error routine 
will clear off the status on return and the sense information ist not available. 

Note 10: 3895 error codes are returned in CCB Byte 8. Refer to 3895 document reader/inscriber 
maschine and programming description for information on these error codes. 



INPUT/OUTPUT REQUEST BLOCK (lORB) 



Count 



Trans- 
mission 
informa- 
tion 
2 


CSW 

Status 

Bits 

4 


Type Code 

and 

Logical 

Unit 

6 


Reserved 

for 

Logical 

IOCS 

8 


CCW 
Address 

9 


Reserved 

for 

Physical 

IOCS 

12 














COW 

Address 

inCSW 

13 


Fix 

Flag 

16 


Address 

of 

Fixlist 

17 


Version 
ID 

20 


Special 
Process- 
ing Flags 

22 


Optional Extension 


ID 
24 


Address 
25 



Input/Output Request Block (lORB) 

Byte(s) Description 

0-1 



Used for residual count 

Byte 2: 

For transmitting information between physical IOCS and problem program. 

Set by the physical IOCS: 

Bit 0: Traffic bit, wait (Note 3) 

Bit 1 : End-of-File /* or /& (Note 2) 

Bit 2: Irrecoverable I/O error 

Set by the Problem Program: 

Bit 3: Accept irrecoverable I/O error 

Bit 4: Reserved 

Bit 5: Post at device end (Note 3). 

Bit 6: Reserved 

Bit 7: Skip system error recovery 

Byte 3: 

Reserved fur ERP return information. 

Byte 4 (Note 1): 

Bit (32): Attention 

Bit 1 (33): Status modifier 

Bit 2(34): Control unit end 

Bit 3 (35): Busy 

Bit 4 (36): Channel end 

Bit 5 (37): Device end 

Bit 6 (38): Unit check 

Bit 7(39): Unit exception 

Byte 5: 

Bit 0(40): Program controlled interruption 

Bit 1(41): Incorrect length 

Bit 2(42): Program check 

Bit 3(43): Protection check 

Bit 4(44): Channel data check 

Bit 5(45): Channel control check 

Bit 6(46): Interface control check 

Bit 7 (47): Chaining check 



Byte 6 (Class byte): 








BitO: 


Reserved 








Biti: 


Reserved 








Bit 2: 


Copied lORB (370 mode only) 




Bit 3: 


Reserved 








Bit 4: 


Physical addressing 








Bit 5: 


lORBID 








Bit 6: 


Reserved 








Bit 7: 


Programmer logical 


jnit 






Byte 7 (Addressing byte) 








Hexadecimal representation of SYSnnn: 




SYSRDR 


= 00 




SYS R EC 


= OA 


SYSIPT 


= 01 




SYSCLB 


= OB 


SYSPCH 


= 02 




Reserved 


= OC 


SYSLIST 


= 03 




SYSCAT 


= OD 


SYSLOG 


= 04 




SYSOOO 


= 00 


SYSLINK 


= 05 




SYS001 


= 01 


SYS RES 


= 06 




SYS002 


= 02 


SYSSLB 


= 07 








SYS R LB 


= 08 








SYSUSE 


= 09 




SYS240 


= XX 



INPUT/OUTPUT REQUEST BLOCK (lORB) (. . . Cont'd) 

Byte(s) Description 

8 Reserved for Logical IOCS 

9-11 Address for the CCW associated with this I ORB. The address is virtual, except if in 

byte 6, bit 2 is on, then the address is real. 

12 Reserved for physical IOCS: 



BitO: 


lORBisusedbyERP 


Bit 1: 


Reserved 


Bit 2: 


lORB has an extension 


Bit 3: 


Reserved 


Bit 4: 


EU tape error 


Bit 5: 


Reserved 


Bit 6: 


Tape ERP read opposite recovery 


Bit 7: 


Reserved 



13-15 Virtual address of CCW pointed to by CSW at Channel End. 

16 Fix Flag (ignored in 370 mode): 

Bit =1 Compressed: The system needs not to compress the f ixlist. Each page 
to the fixed for the channel program is covered only once by the fix- 
list. 
= Not compressed: The system must compress the fixlist. 
Bit 1 =1 Fixed: No fixlist is provided by the user. The user has fixed all areas. 

= Not fixed: The user has provided a fixlist. 
Bit 2- 7 Reserved 

17—19 Address of the fixlist (ignored in 370 mode): 

Each fixlist area is contiguous and consists of one or more 8-Byte fixlist entries. 
Each entry contains a begin and an end address describing a storage area that has to be 
fixed for the I/O request (an area containig the channel program or an input/output 
area). 

20-21 Version identification code. 

22-23 Special processing flags (set by LIOCS): 

BitO: SYSFIL request for FBA device. 

Bits 1-15: Reserved 

Begin of optional parameters (set by the problem program). 

24 Optional parameter ID: 

Bit 0: Last parameter 

Bits 1-7: IDcode(00 = ECB) 

25—27 Address portion of optional parameter 

Note 1 : Bytes 4 and 5 contain the status bytes of CSW (Bits 32—47). If byte 2, bit 5, is on, the 
accumulated interrupt information will be stored in byte 4 and 5 of the lORB. 

Note 2: Indicates /* or /& statement on SYSRDR or SYSIPT. Byte 4, bit 7, (unit exception) is 
forced on. 

Note 3: The traffic bit (byte 2, bit 0) is normally set on at channel end to signify that the data 
transfer is completed. If byte 2, bit 5, has been set on, the traffic bit is set on at device 
end. See also Note 1. 



I 



3"g S 
IQ 5 =. 

1 s'^- 



SVA Entry 



BG Entry 



Format 
of 

Adress 
Table 



Format 
of SVA 
Entry 






4 


8 


12 ,, 


4xn 


Address 


Address 


Address 


C( 


Address 


of SVA 


of BG 


of Fn 




of F1 


Entry 


Entry 


Entry 


;>:» 


Entry 








C( 





System 


System 


IVIinimum 


Number of 


System 


SVA 


SVA 


Pageable 


Pageable 


PFIX Limit 


PFIX Count 


Page Pool 


Pages in 


GETVIS 


Begin 


End 


SV 


SV 


(number of 


(number of 


(number of 


Pageable 


Area 


Address 


Address 


Begin 


End 


pages) 


pages) 


pages) 


SV 


Address 




+1 


Address 


Address 



\0 



Format 
of any 
Partition 
Entry 



Partition 


Partition 


Partition 


yj 1 Partition 


Partition 


Partition 


Real 


Real 


PFIX Limit 


PFIX Count 


Save 


> „ 1 GETVIS 


Begin 


End 


Partition 


Partition 


(number of 


(number of 


Area 


t S"! Area 


Address 


Address 


Begin 


End Address 


pages) 


pages) 


Address 


eJ "- ! Address 




+1 


Address 


+1 



Bytes 220-223 (X'DC'-X'DF') of the system communication region (SYSCOM) contain the 
address of the storage management control block (SMCB). Label SMCB identifies the first byte 
ofthetabel. 



rp 









4 
4 




8 
8 




OC 
12 




10 
16 




18 
24 




Address of 
Error Block 


Address of 
Attention Exit 


Address of 
Operator 
Option 
Cancel Exit 


Address of 
SYSRESPUB 


Reserved 


Address of 
Ext. Interr. 
Routine 


xxxx 


xxxx 


xxxx 


xxxx 


xxxxxxxx 


xxxx 



1C 
28 


20 
32 


24 
36 




25 
37 


28 
40 


2A 
42 


2C 

44 


2E 
46 


30 
48 


Address of 
Logical 
Transient 
Area 


Address of 
1 st byte of 
Problem Program 
Area 


Free 
List 
Pointer 


Address 
of 

Channel 
Queue 


Number of 
Channel 
Queue 
Entries 


Length of 
One Error 
Queue 
Entry 


Number of 
Partitions 


Flags and 
Switches 
(see expansion) 


Reserved 


xxxx 


xxxx 


x 


XXX 


XX 


XX 


XX 


XX 


XXXX 



34 
52 


35 
53 


38 
56 




40 
64 


44 
68 


46 
70 


48 
72 


4C 
76 


Configuration 

Byte 

(see expansion) 


Address of 
CRT Table 


Reserved 


Flags and 
Switches 
(see expansion)* 


System Task 
Selection 
Control Field* 


Address of 

Task 

Selection 


Reserved 


TH 
Free 
List 
Pointer 


X 


XXX 


XXXXXXXX 


XXXX 


XX 


XX 


xxxx 


X 



* See end of tables for further explanation. 

Note: The address of SYSCOM can be found at fixed location X'80'-X'83'. 



4D 
11 


50 
80 


54 
84 


58 
88 


5A 
90 


5C 
92 


60 
96 


64 
100 


68 
104 


Address 

of 

TH Table 


Address of 
Timer Request 
Table 


Address of 
AB Table 


Key of Task 
owing LTA 
(LIK) 


Key of Task 

running 

(TIK) 


Address of 
POWER/VS 
Table 


Address of 
VTAM Address 
Vector Table 


Address of 
RF Table 


Address of 

EUECB 

Table 


XXX 


xxxx 


xxxx 


XX 


XX 


XXXX 


XXXX 


XXXX 


xxxx 



6C 
108 


70 
112 


74 
116 


78 
120 


7C 
124 


80 
128 


88 
136 


Address of 
OLTEP bucket 


Address of 
RAS Linkage 
Area 


Address of 
ASCII 
Translate 
Table 


Address of 
PUB Ownership 
Table 


Address of 
Job Accounting 
Common Table 


Reserved 


Add res of 
SDAID 
Comm. Area 


xxxx 


xxxx 


xxxx 


xxxx 


xxxx 


xxxxxxxx 


xxxx 



8C 
140 


90 
144 




94 
148 


98 
152 


9C 
156 


AO 
160 


A1 
161 


A2 
162 


A3 
163 


Address of 
Line Mode 
Table 


Reserved 


Address of PTA 


Address of first 
System Task Block 


Address of Task 
Block of Active 
System Task 


1 byte for 
Alignment 


Pointer to 
SENSE Task 
Block 


Pointer to 
Disk ERP 
Task Block 


Pointer to 
RAS Task 
Block 


xxxx 


xxxx 


xxxx 


xxxx 


xxxx 


X 


X 


X 


X 



A4 
164 


A5 
165 


A6 
166 


A7 
167 


AS 
168 


A9 
169 


AA 
170 


AB 
171 


AC 
172 


AF 
175 


BO 
176 


Pointer to 
PIVIGR 
Task Block 


Pointer to 
PGT 
Task Block 


Pointer to 
PAGEIN 
Task Block 


Pointer to 
SUPV 
(FETCH) 
Task Block 


Reserved 


Pointer to 
CRT 
Task Block 


Reserved 


Pointer to 
ERP 
Task Block 


Reserved 


Pointer to 
SVF 
Task Block 


Address of 
Task Timer 
Table 


X 


X 


X 


X 


X 


X 


X 


X 


XXX 


X 


XXXX 



B4 
180 


B8 
184 


BC 
188 


BE 
190 


CO 
192 


CB 
203 


CC 
204 


CE 
206 


DO 
208 


Reserved 


TRTIViSK 
pointer 


TP Balanc- 
ing 
Parameter 


Key of 
partition 
owning 
Task Times 


Repositioning Information 
for 2560/5424/5425 ERP 


Number of 
Error Queue 
Entries 


Length of 
PUB Table 
in bytes 


Number of 

Active 

Partitions 


Address of 
Segment Table 
(370 mode) 


XXXX 


XXXX 


XX 


XX 


XXXXXXXXXXX 


X 


XX 


XX 


XXXX 



D4 
212 




DC 
220 


EO 
224 


E4 
228 


E6 
230 




~E8 
232 




EC 
236 


Reserved 


Address of Storage 
Control Block 


Address of 
DPD Table 


Address of 
System Operator 
Console 


Reserved 


Reserved 


Address of End 
of Real Storage 
in 370 mode 


xxxxxxxx 


XXXX 


XXXX 


XX 


XX 


XXXX 


XXXX 



FO 
240 


F4 
244 


F5 
245 


F8 
248 


FC 
252 


100 
256 


104 
260 


108 
264 


Address of 
Fetch Table 


SVA Flags 
(see expansion) 


Address of 
SVA 


Address of 

System 

GETVISarea 


Address of 
RPS Local 
Directory List 


Address of 
RPS Sector 
Calculation 
Routine 


Address of 
System Code 


Reserved 


xxxx 


X 


XXX 


XXXX 


xxxx 


xxxx 


xxxx 


xxxx 



10€ 
268 


110 
272 


114 
276 


118 
280 


lie 

284 


120 
288 


124 
292 


128 
296 


Pointer for 
Symbolic 
Label Access 


Address of 
Supv.-IPL 
Communication 
Region 


Address of 
SVA 
Phase Area 


Address of 
Operator Option 
Cancel Exit 


Reserve"* 


Save area if 
Progr. Check 
in SUPVR 


Reserved 


Table of 
System Units 


xxxx 


xxxx 


xxxx 


xxxx 


xxxx 


xxxx 


xxxx 


xxxx 



* See end of tables for further explanation. 

Note: The address of SYSCOM can be found at fixed Location X'80'-X'83'. 



SYSTEM CONTROL PROGRAM COMMUNICATION REGION (. . . Cont'd) 



Expansion of SYSCOM Flag Bytes 



Byte 


Description 


Dec Hex 


46 2E 


Bit 1 = VSE/Advanced Functions pacl<age 




= SOP pacl<age 




Bit 1 1 = DOS/VSE and follow-on releases 




Bit 2 1 = 1 TPBAL not active 




Bit 3 Reserved! 




Bit 4 1 = CBF supported 




Bits 5-7 Reserved 


47 2F 


Bit 1 = 4300 support generated 




= /370 support generated 




Bits 1-4 Reserved 




Bit 5 1 = AT least on CKD disk supported 




Bit 6 1 = FBA support generated 




Bit 7 1 = 3800 support generated 


52 34 


BitO 1 = CRT support initialized 




Bits 1-5 Reserved 




Bits 6, 7 00 = Typewriter support generated 




01 = 125D support generated 




1 1 = 3277 support generated 


64 40 


Reserved for RMS 




X'80' RMSR supported 




X'40' Full RMS support (MCAR/CCH and RMSR) 




X'20' Reserved, must be 


65 41 


X'80' Initial selection of ERP 




X"40' Reserved 




X'20' Timer interrupt pending 




X'10' fv.lCR Stacker-select active 




X'08' Invalid address during fetch 




X'04' SIO routine entered after interrupt 




X"02' Reserved 




X'Or IPL in progress 


66 42 


X'80' Initial RAS request 




X'40' RAS WAIT request outstanding 




X"20* RAS IPL in progress 




X'10" Reserved 




X'08' POWER/VS supported, always on 




X'04' POWER/VS initialized 




X'02' GETREALforSDAID in progress 




X'OV Reserved 


67 43 


X'80' System GETVIS area initialized 




X"40' ECPREAL supported, always on 




X'20' VSAM supported, always on 




X'10' Reserved 




X'08' XECB support generated 




X'04' Reserved 




X'02' Batch deactivated by TPIN 




X'OV Reserved 


68 44 


Always zero 


69 45 


SELECT byte: 




X'OO' No system task active 




X'OI- SNS active 




X'02' DSK active 




X'03' RAS active 




X'04' PMGR active 




X'05' PGT active 




X'06' PG IN active 




X'07' SUPV active 




X'09' CRT active 




X'OB' ERP active 




X'OF* SVT active 



I 



SYSTEM CONTROL PROGRAM COMMUNICATION REGION (. . . Cont'd) 



Expansion of SYSCOM Flag Bytes 



Byte 


Description 


Dec 


Hex 


244 


F4 


SVA Flag 

X'80" Reserved 

X'40' SDL active 

X'20' Reserved 

X'10' Build of SDL in progress 

X'08' SDL overflow 

X'04' Reserved 

X'02' Reserved 

X'Or Reserved 


252 


FG 


X'OOOOOOOO- RPS not initialized 
X'OOXXXXXX' Pointer to RPS LDL in SVA 


256 


100 


-X'OOOOOOOO' No RPS support 

X'OOXXXXXX' Pointer to Sector Calculation Routine 



I Q 







8 
8 


OC 
12 


17 
23 


18 
24 


20 
32 


24 
36 


28 
40 


2C 

44 


Date 


Reserved 


User area 


UP SI 
Byte 


Job Name 


Highest 
Storage 
Address of 
the Partition 


End Address of 
Last Phase 
Fetched or loaded 


Address of upper- 
most Byte of Phase 
with highest 
Ending Address 


Label 
Area 
Length 


xxxxxxxx 


xxxx 


xxxxxxxxxxxx 


X 


XXXXXXXX 


xxxx 


xxxx 


xxxx 


XX 



2E 
46 


30 
48 


34 
52 


35 
53 


36 

54 


37 
55 


38 
56 


39 
57 


3A 
58 


3B 
59 


3C 
60 


3E 
62 


PIK 


End of 
Virtual 
Storage 
Address 


Machine 
Configur. 
Byte 


System 

Configur. 

Byte 


Standard 
Language 
Translator 
I/O Options 


Dump, Log, 
RELLDRand 
ASCII 
Options 


Job Control 
Byte 


Linkage 
Control 
Byte 


Language 
Translator 
Control 
Byte 


Job Duration 
Indicator Byte 


Reserved 


Address 

of 

FOCL 


XX 


XXXX 


X 


X 


X 


X 


X 


X 


X 


X 


XX 


XX 










* Job Control Switches — ' 







40 
64 


42 
66 


44 
68 


46 
70 


48 
72 


4A 
74 


4C 
76 


4E 
78 


4F 
79 


58 
88 


5A 
90 


5C 
92 


Address 

of 

PUBTAB 


Address 

of 

FAVP 


Address 

of 

JIBTAB 


Address 
BTAB 


Address 

of 

FICL 


Address 

of 

NICL 


Address 

of 

LUBTAB 


Line Count 

for 

SYSLST 


System Date 


LIOCS 

Comm. 
Bytes 


Address of 
PI B Table 


ID Number of 
last Checkpoint 
or DASDFP 
Indicator 


XX 


XX 


XX 


XX 


XX 


XX 


XX 


X 


XXXXXXXXX 


XX 


XX 


XX 



iNoxe: 

A communication region exists for each partition supported by the system. 

The address of the communication region of the active partition is in fixed loc.X'14'— X'17'. 



5E 
94 


60 
96 


62 
98 


63 
99 


64 
100 


66 
102 


68 
104 


6A 
106 


6C 
108 


6E 
110 


Job Zone 

in 

Minutes 


Address of Disk 
Information 
Block (DIB) 


Device Flag 
for 

Automatic 
Close 


Reserved 


Address of PC 
Option Table 
less 8 bytes 


Address of IT 
Option Table 
less 8 bytes 


Address of OC 
Option Table 
less 8 bytes 


Key of 
Partition 


Reserved 


Logical 

Transient Key 
(LTK) 


XX 


XX 


X 


X 


XX 


XX 


XX 


XX 


XX 


XX 



70 
112 




74 
116 


78 
120 


7C 
124 




7E 
126 


80 
128 




84 
132 


86 
134 




87 
135 


Address of 
SYSPARM 


Address of 
J. A. Partition 
Table 


Address of 
TOD clock 
Common Area 


Address of 
PIB Table 
Extension 


Address 
ofMICRDTF 
Table (PDTABB) 


Slot for 
Pointer to 
Lable Area 


Address 

of BG Comm. 

Region 


Option 
Indicator 


System Configuration 
Byte2andRMSR 
Open Flag Byte 


xxxx 


xxxx 


xxxx 


XX 


XX 


xxxx 


XX 


X 


X 



88 
136 




8C 
140 


8D 
141 


8E 
142 


8F 
143 


97 
151 


98 
152 




9F 
159 


Reserved for 
compatability 
Reasons 


Standard Job 
Control 
Options 1 


Temporary 
Job Control 
Options 1 


Disk 
Configuration 


Catalog 
Procedure Name 


Switch for 

Catalog 

Procedure 


JCL 

Statement 

Name 


81 bytes 
SYSIN Indicator 


xxxx 


X 


X 


X 


xxxxxxxx 


X 


XXXXXXX 


X 



A communication region exists from each partition supported by the system. 

The address of the communication region of the active partition is infixed loc. X'14'-X'17'. 



AO 
160 


A4 
164 


A5 
165 


A6 
166 


AS 
168 


AC 
172 


AD 
173 


AE 
174 


AF 
175 


BO 
176 


B4 
180 


Address of 
POWER/VS 
Partition 
Control Block 


POWER/VS 
Flag Byte 1 


POWER/VS 
Flag Byte 2 


Reserved 


Address of 
LUB Table 
Extension 


Job Control 
Switch 5 


Job Control 
Switch 6 


Standard 
Job Control 
Options 2 


Temporary 
Job Control 
Options 2 


Reserved 


Reserved 


xxxx 


X 


X 


XX 


xxxx 


X 


X 


X 


X 


xxxx 


xxxx 



A communication region exits for each partition supported by the system. 

The address of the communication region of the active partition is in fixed loc. X'14'-X'17*. 



PARTITION COMMUNICATION REGION (. . . Cont'd) 

Key to Communication Region Displacement 

MM/DD/YY or DD/MM/YY either set permanently by the job control date statement, or 
updated everytimeaGETIME macro is issued when time-of-day support is provided. Format 
controlled by BGCOMREG + 53. 
(System Configuration Byte, date convention bit 0). 

8 Reserved 

12 User area. 

23 User program switch indicator. 

24 Job name set by the job control program form information found in the job statement. 

32 Address of the uppermost byte available to the problem program. 

36 Address of the uppermost byte of the last phase of the problem program fetched of loaded. 
Not filled in when phase is in SVA. 

40 Address of the uppermost byte of the phase with the highest ending address for this 
partition, starting with the same 4 characters as the root phase (operand on the exec 
statement) and residing in the same core image library as the root phase. If the root phase 
is in the SVA, the partition start address plus 2 K will be used. 

44 Length of the problem program label area. 

46 Partition identification key (PIK) of the partition owning this communication region. How- 
ever, the communication region of the BG partition always contains the PIK of the currently 
active partition. That is, if contains the PIK of the BG partition only, if the BG partition is 
active. 

48 End address of virtual storage. 



PARTITION COMMUNICATION REGION (. . . Cont'd) 



Expansion of COMREG Flag Bytes 



Byte 


Description 


Dec Hex 


52 34 


Machine Configuration Byte {Values set as supervisor generation time) 




X'80' Always set to indicate standard storage protect 




X'40' Decimal feature (always set) 




X'20' Floating point feature 




X'10' Physical transient overlap option (always set) 




X'08' Always set to indicate standard timer feature 




X'04' Channel switching support 




X'02' Burst mode on multiplex channel support (always set) 




X'OV Reserved 


53 35 


System Configuration Byte 




X'80- DDMMYY (Date convention bit set by STDOPT statement) 




X'40' Two or more partitions, always on 




X'20' DASD file-protect support 




X'10' DASDSYSIN-SYSOUT 




X'08' Teleprocessing, always on 




X'04' Two or more partitions, always on 




X'02' Asynchronous processing, always on 




X'Or Track hold/Block hold 


54 36 


This byte contains the standard language translator I/O options 




after generation, defaults are valid: 1 100 1 10 




X'80' DECK option output objekt modules on SYSPCH 




X'40' LIST option output source module listings and diagnostics on 




SYSLST 




X'20' LISTX option output hexadecimal object module listings on 




SYSLST (compilers only) 




X'10' SYM option output symbol tables on SYSLST/SYSPCH 




X'08' XREF option output symbolic cross-reference list on SYSLST 




X'04' ERRS option output diagnostics on SYSLST (compilers only) 




X'02' CHARSEToption input on SYS IPT is 48 or 60 character set 




X'01' Reserved 


55 37 


This byte contains the standard supervisor options for abnormal EOJ. 




Relocating Loader and Control statement display and the indicator for the 




presenceof the ASCII-EBCDIC and EBCDIC-ASCII translation tables. 




X'80' Always on 




X'40' DUMP option (DUMP=YES OR DUMP=PART) 




X'20' Partition is in wait state, because a volume is to be mounted 




X'10' LOG option Yes, list all control statements on SYSLST 




X'08' Dummy device search in progress; 




do not enter ERP 




X'04' Reserved 




X'02' Relocating Load option yes. Relocating Loader supported (always set) 




X'OV ASCII option yes, ASCII supported 


56 38 


Job Control Byte 




X'80' Job accounting Interface (JA) not supported 




X'40' Return to caller on LI OCS disk open failure 




X,20' Job control input from SYSRDR 




X'10' Job control output on SYSLOG 




X'08' Cancel job 




X'04' Pause at endof-job step 




X'02' SYSLOG is a console printer-keyboard or DOC (always on) 




X'01 ' SYSLOG is assigned to the same device as SYSLST 


57 39 


Linkage Control Byte 




X*80* SYSLNK open for output 




X'40' Update of Second Level Directory and RAS loadlist in progress 




(interface between SMAINDIR and Supervisor) 




X'20' Allow EXEC 




X'10' Catalog linkage editor output 




X'08' Supervisor has been updated 




X'04' PCIL open in progress 




X'02' Update of System Core Image Library in progress (interface between 




SMAINDIR and Supervisor) 




X'OV Reserved 



I 



PARTITION COMMUNICATION REGION (. . . Cont'd) 



Expansion of COMREG Flag Bytes 



Byl 


e 


Description 


Dec 


Hex 


58 


3A 


Language processor control byte. This is a set of switches used to specify 
nonstandard language translator options. The switches within the byte are 
controlled by job control OPTION statements and when set to 1. override 
standard options. The format of this byte is identical to the standard option 
byte (displacement 54) with one exception: Bit 7 in this byte is used to in- 
dicate to LIOOS that the rewind and unload option has been specified. 


59 


3B 


Job Duration Indicator Byte 

X'80' Job in progress 

X'40' Dump or partition dump on an abnormal EOJ condition (see byte 141 ) 

X'20' Pause at EOJ step. Set by attention routine for job control 

X'lO" Job control output on SYS LST 

X'08' Job is being run out of sequence with a temporary assignment for 

SYSRDR 
X"04' FOIL is being condensed 
X*02' / /DATE statement processed for current job 
X'01 ■ Batch command just issued 


60 


30 


Reserved 


62 


3E 


Addresses 
of I/O tables 


76 


4G 


as 
illustrated 


78 


4E 


Set to the value nn specified in the LINES=nn parameter of the STDOPT 
statement. Initial value = 56. 


79 


4F 


The format of the system date contained within this field is determined by 
the IPL program from information supplied in the date convention bit 
(displacement 55). Bytes 85-87 contain the day count. 


88 


58 


Bytes reserved for use by LIOOS. Transient dump programs insert a key to 
indicate to the LIOOS End-of-Volume routine, SSB0MT07, that it was called 
by B-transient. 


90 


5A 


Address of the first part of the Program Information Block (RIB) table. 


92 


50 


1 D number of the last checkpoint (hexadecimal). 


93 


5D 


Bytes 92 and 93 are also the temporary indicator of file protected DASD. 
Bits 0-15 correspond to channels 0-15. A bit ON means DASDFP for that 
channel. 


94 


5E 


Job zone for Time-of-Day. If ZONE=EAST, value is positive, if ZONE=WEST, 
value is negative. 


96 


60 


Address of disk I/O position data. This is the starting address of the Disk In- 
formation Block (DIB) table for the partition. 


98 


62 


Device flag for automatic close. 

Bit 0: One or more 3800 printer extended buffering DTFs is/are open. 


99 


63 


Flag byte X'80' = BTAM in the partition. 


100 


64 


PO table 


102 


66 


IT table 


104 


68 


00 table 


106 


6A 


PIK of partition 


108 


60 


Reserved 


110 


6E 


Logical Transient Key (LTK) contains the same value as the PI K (Displace- 
ment 46) when the logical transient is requested. When the transient area is 
not in use, LTK is equal to zero. The SVO 2 routine sets the LTK. The SVO 
1 1 routine resets the LTK. (Only significant in BG communication region.) 


112 


70 


Address of SYSPARM field. 


116 


74 


Address of Job Accounting partition table. 


120 


78 


Address of Time-of-Day clock common area. 


124 


70 


Address of second part of Program Information Block (PIB) table. 


126 


7E 


Address of PDTABB, table of DTF addresses for MIOR support. 


128 


80 


Slot for pointer to label area. 



PARTITION COMMUNICATION REGION (. . . Cont'd) 



Expansion of COMREG Flag Bytes 



Byte 


Description 


Dec 


Hex 


132 


84 


Address of background communications region. 


134 


86 


Option Indicator Byte 

X'80' Reserved 

X'40' EU interface active 

X"20* Teleprocessing request 

X'10' Supervisor support for tape, always on 

X'08' Reserved 

X'04' Reserved 

X'02' Reserved 

X'01 ■ GETVIS function has been initiated 


135 


87 


System Configuration Byte 2 and RMSR Open Flag Byte 

X'80' PCIL supported, always on 

X'40' TOD clock supported, always on 

X'20' PFIX macro supported, always on 

X'10" Fetch SSBOPEN by SJOBCTLJ 

X'08' Fetch SSBOPEN by SJOBCTLD 

X"04" Fetch SSBOPEN by SJOBBCTLJ for WTM 

X'02" Reserved 

X'OV RPS supported 


136 


88 


Reserved for compatibility reasons. 


140 


8C 


Standard Job control option byte initial value- 
X'80' EDECK Standard Option 
X'40' ALIGN Standard Option 1 
X"20' PARTDUMP Standard Option 
X'10' RLD Standard Option 
X'08' SXREFSTD Option 
X'04' TERM STD Option 
X'02' Reserved 
X'01' ACANCEL Standard Option 


141 


8D 


Temporary Job control option byte 
X'80' EDECK Temporary Option 
X'40' ALIGN Temporary Option 
X'20' PARTDUMP Temporary Option 
X'10' RLD Temporary Option 
X'08' SXREF Temporary option 
X'04' TERM Temporary option 
X'02' SUBLIB=DF Temporary Option 
X'01' 1=ACANCEL Temporary Option 


142 


8E 


Disk Configuration Byte 

0-3 Reserved 

X'08' 3350 supported 

X'04' 3340 supported 

X'02' 3330 supported 

X'01' 2311 and 2314/2319 supported. 


143 


8F 


Cataloged Procedure Name 


151 


97 


Interface Byte for Cataloged Procedures 

X'80' Procedure being executed 

X'40' Overwrite processing 

X'20' Procedure with data 

X'10' Overwrite request for Job Control 

X'08' Insert request for Job Control 

X'04' Procedure end 

X'02' SYSLOG procedure 

X'01 ' Overwrite request for Supervisor 


152 


98 


ICL statement name for Cataloged Procedure 



I 



PARTITION COMMUNICATION REGION (. . . Cont'd) 



Expansion of COMREG Flag Bytes 



Byte 


Description 


Dec 


Hex 




159 


9F 


SYS! N 81 Bytes Indicator 

X'80- Permanent 81 bytes on SYSRDR 
X'40' Permanent 81 bytes on SYSIPT 
X'20' Temporary 81 bytes on SYSRDR 
X'10' Temporary 81 bytes on SYSIPT 

Reserved 
X'Or Allow/&forMAINTCATALS 


160 


AO 


Pointer to POWE R/VS partition control block. 


164 


A4 


POWER/VS Flag Byte 1 

X'80' POWER/VS Accounting Supported 
X'40' Partition under control of POWE R/VS 
X'20' POWER/VS Partition 
X'lO- Reserved 

X'08' Partition is waiting for work 
Reserved 


165 


A5 


POWER/VS Flag Byte 2 Reserved 


166 


A6 


Reserved 


168 


AS 


Pointer to LUB Table Extension 


172 


AC 


Job Control Switch 5 






Bit 
1 
2 
3 

4 
5 
6 

7 


1= EXEC LNKEDT statement is to be generated 

Reserved 

Reserved 

1=NEWV0L ignored 

Reserved 

Reserved 

Reserved 

1=Job Control active 


173 


AD 


Job Control Switch 6 
0-6 Reserved 

7: 1=Fetch search sequence changed 


174 


AE 


Standard Job Control Option 2 
(Reserved) 


175 


AF 


Temporary Job Control Option 2 
(Reserved) 



PARTITION IDENTIFICATION KEY (PIK) 



Task 
or 


PIK value in BGCOMREG 


Number of partitions supported 


Partition 












5 


4 


3 


2 


Attention 


X'OO- 


X'OO- 


X'OO' 


X'OO' 


BG 


X'10" 


X'10' 


X'10' 


X'10' 


F4 


X'20' 








F3 


X'30' 


X'20' 






F2 


X'40' 


X'30' 


X'20* 




F1 


X'50' 


X'40' 


X'30' 


X'20' 



TASK INTERRUPT KEY (TIK) 



Task 


TIK value 


Number of partitions supported 


5 


4 


3 


2 


Attention 


X'OO' 


X'OO' 


X'OO' 


X'OO' 


BG 


X'10' 


X'10' 


X'10' 


X'10' 


F4 


X'20' 








F3 


X'30' 


X'20' 






F2 


X'40' 


X'30' 


X'20' 




F1 


X'50' 


X'40' 


X'30' 


X'20' 


Subtask* 


X'60'-X'F0' 


X'50'-X'F0' 


X*40'-X'F0' 


X'30'-X'F0' 



LOGICAL TRANSIENT OWNER IDENTIFIKATION KEY (LIK) 

The halfword LIK at displacement 88 in SYSCOM contains the same value as the TIK when the 
Logical Transient Area (LTA) is in use and therefore identifies the owner of the LTA. When LTA 
is free, the halfword LIK contains zeros. The SVC2 routine sets the LIK, and the SVC1 1 routine 
resets it to zero. 

LOGICAL TRANSIENT KEY (LTK) 



The halfword LTK at displacement 1 10 in each partition communication region has a zero value 
in the high-order byte and a key value in the low-order byte. In a foreground communication 
region, the key value in the LTK is not significant. The LTK in the background communication 
on region (BGCOMREG) has the same value as the PIK of partition of the task that owns the 
LTA. or contains zeros when the LTA is free. The SVC2 routine sets the LTK, and the SVC1 1 
routine resets it to zero. 



< 


' 






8 
8 


9 
9 


OA 
10 


OB 

11 


OC 
12 


10 
16 


14 
20 


16 
22 


18 
24 


CPU ID Field 


Damaged 
Channel 
Byte 


RAS 
Flag Byte 


Machine 

Check 

Flags 


Reserved 


RAS Table 
(RASTAB) 
Address 


Base Address 

for 

RAS Monitor 


Internal 

Model 

Number 


Length of 
I/O Extended 
Logout Area 


Address of 
extended mach. 
check LOGOUT 
area 


f 


xxxxxxxx 


X 

1 


X 


X 


X 


xxxx 


xxxx 


XX 


XX 


xxxx 



■^ Key to RAS Linkage Area displacement 






CPU ID Field 






8 


Address of damaged channel, 


or X'FF' if no channel damaged 


9 


RAS Flag Byte 






bit 



flag 
X'80' 


description 
RAS active 




1 


X"40' 


RAS SIO flag 




2 


X'20' 


RTA in control 




3 


X'10" 


RAS I/O delayed 




4 


X'08' 


Channel check on error SIO 




5 


X'04' 


Reserved 




6 


X"02' 


Channel check on SIO 




7 


X'OV 


I/O active for SIO 



10 


Machine Check Flags 




bit 
0-4 
5 
6 

7 


flag description 

Reserved 
X'04' Hard machine check 
X*02' All machine records built 
X'01 ' All channel check records built 


11 


Reserved 




12 


Address of RAS Monitor Table (RASTAB) 


16 


Address for base register in RAS Monitor Program 


20 


Internal Model Number 


22 


Length of I/O extended logout area 


24 


Address of machine check extended LOGOUT area 
(if byte = X'SO', address not yet valid) 



Bytes 112-115 (X'70'-X'73') of the System Communication Region (SYSCOM) contain the 
address of the area. Label RASLINK identifies the first byte of the area. 



SYSTEM TASK BLOCKS 



SNS BLOCK 


\ 

\ 


DSK BLOCK 


\ 

\ 


RASBLOCK 


\ 
\ 


PMGR BLOCK 




PGT BLOCK 


ill 


PGIN BLOCK 


SUPV BLOCK 




CRT BLOCK 


/ 


ERP BLOCK 


/ 


SVT BLOCK 


1 
1 
1 



- Address of PIB Flag for System Task 
Reserved 



— Job Accounting ID 
5 7 



Address of System 
Task Save Area 



- PIK or TIK of Serviced User Task 



Notes: 

Bytes 152-155 (X'98'-X'9B') of the System Communication Region (SYSCOM) contain the 

address of the first System Task Block. 



Attention PIB 



Background PIB 



Subtask PIB 



Subtask PIB 








1 


2 3 


4 


5 6 7 


8 


9 10 11 


12 


13 


14 


15 


^J 


Flag 


Cancel 


SYSLOG 


DAT 


Address of 


Switch 


Address of 


X'07- 


BG 


Number 


Flag 


3 3 


Byte 


Code 


ID 


FLAG 


System Save 


Byte 


LTA Save 


PIB 


user 


ofBG 


Byte 


5' " 






(AR) 




Area 




Area 


assign 


LUB 


program 




=> y. 










(Notel) 




(Note 1 


flag 


Index 


LUBs 




00 


(See (A]) 






(See \b\) 




(See [F]) 


and 2) 


(See \D\) 






(See [E]) 



Ro' 


Flag 


Cancel 


SYSLOG 


DAT 


Address of Problem 


— 3 


Byte 


Code 


ID 


Flag 


Program save area or 


=?n 










LTA save area 


3^ 


(See [A]) 






(See d) 


(Note 2) 



(See [C]) 



Address of system save 



assign 
flag 

(See [5]) 



User 
LUB 
index 



Program 
LUBs 



Flag 
Byte 

(Seel) 



Note 1 : When the LTA is active for logical attention the contents of bytes 5—7 and bytes 9-1 1 
of the attention PIB are exchanged. 

Note 2: When the LTA is active for problem programs the contents of byte 9-1 1 of the attent- 
ion PIB and byte 5-7 of the problem program PIB are exchanged. 

Byte 90—91 (X'5A'— X'SB') of the partition communication regions contain the address of the 
first part of the PIB table. Label PIBTAB identifies the first byte of the table. 



PROGRAM INFORMATION BLOCK P!B - First Part {. . . Cont'd) 

[a] Flag Byte (First Byte in FIB) 
Flags which are always used: 

X'65' Task is waiting for free page frames 

X'67' Task is waiting for IDRA 

X'69' Task is waiting for ALLOCATE routine 

X'6B' Task is waiting for SETLI MIT routine 

X'6D' Task is waiting for GETVIS routine 

X'71' Program is waiting for GETREAL 

X'73' Program is waiting because system is seized 

X'75' Program is waiting for copy block 

X'77' Program is waiting for TFREE 

X'79' Program is waiting for channel queue entry 

X'7B' Program is waiting for CCW translation 

X'7D' Program is waiting for AVR information 

X"7F' Program is waiting for XECB table 

X'80' Program is not active 

X'BV Program is SVC2 bound (waiting for the LTA to be released) 

X*82' Program is SVC7 bound (waiting for I/O interruption) 

X'83' Program is ready to run 

X'B5' Program is SVC5 bound (waiting for the PTA to be released) 

X*86' Initial selection of RAS (used only for RAS PIB flag) 

X'87 • Program is set to common bound condition 

X'89' Program is terminator bound (waiting for terminator to be released) 

X'BB' Task is waiting for USE/RELEASE routine 

X'8D' Task is waiting for subsystem identifier routine 

X'8F' Extent bound/task is waiting for ext. routine 

X'91' CIL bound 

X'93' Task is waiting for SDL update to be completed 
Flags used only under certain conditions: 
Flags with partition-dependent values: 

The table below shows the various possible values of these flags and the partition to which a 
given value refers, depending on the number of partitions. The meanings of the flags types 
A, B, C, and D are explained below the table. 



I 



Flag 


Partition referenced 












NPARTS = 




A 


B 


C 


D 


2 


3 4 


5 


X'27" 


X'35" 


X'43' 


X'55' 


BG 


BG BG 


BG 


X'29' 


X'37' 


X'45' 


X'57' 


F1 


F2 F3 


F4 


X"2B' 


X'39' 


X'47' 


X"59' 




F1 F2 


F3 


X'2D' 


X'3B' 


X'49' 


X'5B- 




F1 


F2 


X'2F' 


X'3D' 


X'4B' 


X'5D' 






F1 



Flag A The codes are used by the PFIX routine to set a partition PFIX bound 

Flag B The codesare used to gate the CDLOAD routine for tasks running in one partition. 

Flag C The codes are used to gate the GETVIS routine for tasks running in one partition. 

Flag D The codes are used by the load leveler to deactivate a partition . 

Flags with partition- independent values: 

X'62' Program is SVC35-bound *1 

X'63' Program is SVC35-bound/ 

X'6D' Program is waiting for the next freed page frame. 

X"51' Program is SVC38-bound 

X'53' Program is SVC41/42-bound 

The following flag is used only if CBF=n: 

X'6F' Program is waiting for free console buffer table entry 

The following flag is used only if DASD File Protect is supported: 
X'8F' Task is waiting for extent routine 



onlyifTRKHLD=n 



PROGRAM INFORMATION BLOCK PIB - First Part (. . . Cont'd) 

[i] PIB DAT FLAG 

X'OT Return to reentrant supervisor routine 

X'02' Return to gated supervisor routine 

X'04' Move CCB/IORB at dispatching time 

X'08' Service delayed external interrupt 

X'10' Deactivation for this task is being delayed 

X'20' Operator communications to be serviced 

X'40' Task has seized the system 

X'80' Program is running in virtual mode 



[£] 



Gate Identifier 

X'71' Gating of SVC 58 required 
X'53' Gating of SVC41/42 required 

The flags are only used if PI B DAT Flags is X'03', that is, Bits 6 and 7 are on. 
(See B ). 

[d] PIB Assign Flag 

X'80' SYSRES DASD file protect inhibited (allow write operation on SYSRES) 
X'40" Channel appendage exit allowed (BTAM, POWER/VS) 
X'20' Cancel occured in LTA 
X'10' Cancel control (set on a foreground cancel) 
X'08' Hold foreground assignments 
X'04' Do not ready task for cancel 
X'02' Terminator finished (fetch endof-job monitor) 

X'01' Privileged status indicator (either the LTA or the SVA resident terminator is 
active for this task) 



E 







Problem Program PIB Flag (Last Byte in PIB) 

Bit 0: 1 = Return to terminator 

Bit 1 : 1 = Cancel in LTA and device not assigned 

Bit 2: 1 = /&onSYSIN 

Bit 3: 1 = Partition in stopped state 

Bit 4: 1 = Initialize Terminator 

Bit 5: 1 = Task is terminating 

Bit 6: 1 = Maintask: Subtask attached 

Subtask: Cancel all requester 

Bit 7: 1 = Task in AB routine is active 

Attention PIB Switch Byte 

Bit 0: Reserved 

Biti: 1 = Fetch Physical Attention Transient SSABERRZ 

Bit 2: Reserverd 

Bit 3: 1 = Emergency cancel request 

Bit 4: Reserved 

Bit 5: 1 = Command available (DOC) 

Bit 6: 1 = Fetch Logical Attention Routine (SSBATTNA) 

Bit 7: 1= External Interrupt request 



Attention 


PIB 


Background PIB 


FGn 


PIB 


^======4 


FG2 


PIB 


FG1 


PIB 


Subtask 


PIB 




Subtask 


PIB 



Address of 


1 

System 


Interrupt 


Address of termination ECB 


Program 


unused 


Flag 


communication 


LUB 


Information 


if any, otherwise zeros 


Interrupt 




Byte 


region 


index 






Key(PIK) 






(Notel) 
' 




(See table @ below) 








® 



Always BG communication region in Attention- and Background PIB extension. 
Appropriate communication region in other PIB extensions. To place this address in a 
register instruction ICM should be used. 

For each PIB Table entry (first part) an entry exists in the PIB Table Extension 
(second part). 

Bytes 124-125 (X'7C'-X'7D') of the partition communication region(s) contain the 
address of the PIB Table extension. Label PIB2TAB identifies the first byte of the PIB 
Table extension. 



® 



Type of interruption 


C Contents of PIB Extension Bytes 


4 


5 


6 1 7 


SVC 

PC 

I/O 


00 
00 
00 


ICL* 
ICL* 
00 


Interruption Code 
Interruption Code 
I/O Address 



(D 



* ICL (Instruction Length Code) is in bits 5 and 6, other bits are zeros. 



Byte 15 


Bits 0-1 


: Reserved 


Bit 2 




1 = Task owns CRT 


Bit 3 




VSAIVI automatic close in progress 


Bit 4 




Not used 


Bits 




1 = SVC screening 


Bite 




Reserved 


Bit 7 




XECB: Task issued SVC 92, 93, or 94 



SAVE AREAS 

Layout of LTA and Problem Program Save Area 



Notel 


PSW 


Reg 9 


Reg A 


RegB 


RegC 


RegD 


RegE 


RegF 


RegO 


Regl 


Reg 2 


Reg 3 


Reg 4 


Reg 5 


Reg 6 


Reg 7 


Reg 8 


Note 2 


FLTPT RO 


FLTPT R2 


FLTPT R4 


FLTPT R6 



Note 1 : Problem Program Save Area: 
LTA Save Area: 

Note 2: Problem Program Save Area: 
LTA Save Area: 



Program Name 
Transient Name 

Byte 0, 1 : Reserved 

Bytes 2—7: Job Start Time in TOD Format 

Reserved 



Layout of User Save Area (for AB, PC, PC, IT, and TT Routines) 



Interrupt Status Information * 


RegO 


Regl 


Reg 2 


Reg 3 


Reg 4 


Reg 5 


Reg 6 


Reg 7 


RegB 


Reg 9 


Reg A 


RegB 


RegC 


RegD 


RegE 


RegF 



Interrupt Status Information: 



Byte 0: 


Reserved 


Byte 1 : 


Protection key and mask (from PSW byte 1) 


Bytes 2, 3: 


Interruption Code 


Byte 4: 


Bits 0-1 Instruction Length Code 
Bits 2-3 Condition Code 
Bits 4-7 Program Mask 


Bytes 5-7: 


Instruction Address 


Byte 8: 


General Register 0-15 



I/O TABLE INTERRELATIONSHIP 



NICLFICL LUBTAB JIBTAB g^ F.XTENT (Entry length 12 bytes) 



System 
BG 
Fn 

F2 

F1 

m = number of units 
n = index to first 
programmer unit 



m 



PUB- 
OWNER 



^ 



[>► 



3^ ^ 

< — I <u 



n 



I 



i 






::-► 




ZJlZ-c. 



THTAB 

(Optional) 
LMT 

Used by PIOCS) 
CHANQ (Entry length 32 bytes) 



FLPTR 






• Optionally allocated and initialized by IPL. 



LOGICAL UNIT BLOCK (LUB) TABLE 



Number in 
Class List 
(NICL) 



First in 
Class List 
(FICL) 



BG 

System LUBs 



BG 

Programmer LUBs 



System LUBs 



Programmer LUB's 



F2 

System LUBs 



F2 

Programmer LUBs 



F1 

System LUBs 



F1 

Programmer LUBs 




00000000- Points to first PUB and PUBOWNER 

00000001- Points to second PUB and PUBOWNER 
00000010- Points to third PUB and PUBOWNER 



1 1 1 1 1 1 1 — Ignore, assigned ignore 

1 1 1 1 1 1 1 1 - Null Pointer, the LUB is unassigned 

When a logical unit is assigned, the system inserts a pointer 
to the PUB for the phyisical device specified. 



Format of any LUB 



ByteO 



JIB Index (Multiply by 4 = Displacement into JIB Table) or 
X'FF- = Null Pointer, no JIB for this LUB. 

A LUB has a JIB pointer when: 

1 . The logical unit is temporarily assigned. 

2. The logical unit assignment is alternate (ALT). 

3. A DASD file (exept a system I/O file on disk) is opened 
(DASD file protect only). 



Bytes 76 and 77 (X'4C'-'4D') of the partition communication 
region contain the address of the LUB table. Label LUBTAB 
identifies the first byte of the table. 

Note 1 : SYSUSE may be called SYSCTL in error recovery messages. 



2) SYSnn 



PHYSICAL UNIT BLOCK (PUB) TABLE 



Channel 1 
PUBs 



Channel 6 
PUBs 



Job Control Flags — 
Channel Scheduler Flags - 
Device Type- 



TEB Pointer/Retry Conter 
Unit — I 



? 



- Channel Queue Pointer 
-Channel 

Device Characteristic Code 
or SAB Pointer 



FF| PUB-table 
delimiter 
LpuBEND 

Byte 0: Channel number (Hex 0-6, FF = NULL) 

Byte 1 : I/O device unit number 

Byte 2: Hex 0, 1 , 2 points to the first channel queue entry for this device 

Byte 3: This byte is an ERP retry counter 

Byte 4: Device type code 

Byte 5: SS of the MODE = parameter in the DVCGEN macro for tabe unit. (See section 2) 
For an ICA linelVlodel 115 or 125, this byte contains the displacement index of the 
entry in the Line Mode Table (LMT). The address of the LMT is in SYSCOM. 

For DASD with track hold this byte contains a pointer to the track hold table or 
X'FF'. 

For MICR type devices, this byte indicates which external interrupt line is in use. 

For a 3704/3705 Communications Controller, this byte contains the type number of 
the Channel Adapter. 

For 2560 or 5424/5425 

Bit 1 = Repositioning required 

1 = SYSPCH temporarily assigned to hopper 1 
1 = SYSPCH temporarily assigned to hopper 2 

2 = SYSIPTtemporarily assigned to hopper 1 
1 = SYSIPTtemporarily assigned to hopper 2 

3 = SYSRDR temporarily assigned to hopper 1 
1 = SYSRDR temporarily assigned to hopper 2 

5 = SYSPCH permanently assigned to hopper 1 
1 = SYSPCH permanently assigned to hopper 2 

6 = SYSIPT permanently assigned to hopper 1 
1 = SYSIPT permanently assigned to hopper 2 

7 = SYSRDR permanently assigned to hopper 1 

I = SYSRDR permanently assigned to hopper 2 

For 3800 
Bits and 1 

00 = 3800 

01 = 3800 B 
10 = 3800 C 

I I = 3800 BC 



I 



PHYSICAL UNIT BLOCK TABLE {. . . Cont'd) 
Byte 6: Channel Scheduler Flags 



Bit 1 = Device busy 

1 1 = Switchable device 

2 1 = Unit check is pending on device 

3 1 = I/O error queued for recovery 

4 1 = Operator intervention outstanding 

5 1 = 1/0 interrupt outstanding 

6 1 = Burst or overrunable device 

7 1 = 7-track tape unit 

Byte 7: Job Control Flags 

Bit 0—4 Standard MODE assignment for 7-track tape (all ones if not tape, all zeros 

if device is down) 
Bit 5 1 = Device supports RPS 

6 Reserved 

7 Unit check pending on alternate channel 

Notes: A null entry is generated at supervisor generation time for each device to be supported 
by the supervisor. Then standard physical unit assignments are made to the PUB table. 
Physical unit assignments can also be made during IPL. PUBs are ordered by channel 
and priority within a channel. A PUB entry must be generated or added during IPL for 
any device of the installation. 
An entry in the PUB ownership table is associated with each entry in the PUB table. 



PHYSICAL UNIT BLOCK OWNERSHIP TABLE 



Byte 0: Bit 1 = Volume is owned by VTAM 

1 1 = Waiting for volume to be mounted 

Bit 2—7 Reserved 

Byte 1 : Identifies the partition that owns the PUB according to follwing table: 



Flag 


Partitior 


owning PUB if number of partitions is: 




2 


3 


4 


5 


X'OO- 


UA» 










X'OV 


BG 




BG 


BG 


BG 


X'02' 


F1 




F2 


F3 


F4 


X"04' 






F1 


F2 


F3 


X'08' 








F1 


F2 


X'lO- 










F1 



* unassigned 

The number of entries in the PUB Ownership table is equal to the number of entries in 
thePUB table. Associated with each PUB entry is an entry in the PUB Ownership table. 

Bytes 120-123 (X'78'-'7B') of the system communications region (SYSCOM) contain 
the address of the PUB Ownership table. Label PUBOWNER identifies the first byte of 
the table. 



JOB INFORMATION BLOCK (JIB) TABLE 
JIBTAB 



Is:? 

11 

T3 ■=: 


















II 




'- 


li 






n 







12 3 



Byte(s) 


Description 


0-1 

(Contents depends 
on the bit setting 
in byte 2) 


Bit setting 
Byte 2 


Contents 


Bit = 1 
Stored standard 
assignment 

Bit 1 = 1 
Alternate 
assignment 


LUB entry of stored standard assignment. 
(PUB and JIB pointer) 

ByteO: PUB Pointer 
Bytel: X'OO' 


2 


Meaning if bit = 1 

Bit 0: Stored standard assignment 

Biti: Alternate assignment 

Bit 4: The alternate assignment indicated in bit 1 is permanent. 

Bit 5: Cataloged procedure processing 

Bit 6/7: Reserved 


3 


Chain byte 

Contains the displacement index of the next JIB. 

X'FF' defines the end of the chain. 



I 



Bytes 68—69 (X*44'— '45') of the partition communication region contain the address of the JIB 
table entry. Label J I BTAB identifies the first byte of the table. 



CHANNEL QUEUE TABLE (CHANQ) 



Bytes 37-39 {X'25'-X'27') of the system Communication Region (SYSCOM) contain the address 
of the Channel Queue table. Label CHANQ identifies the first byte of the table. 



t 

3 H 






il 






s^ 






2 .Q 






§i 






^& 






2i o 






1 






1 







Channel Queue Table (CHANQ) 

The layout of an entry is as follows: 

Bytes Contents 

Contains the displacement within the channel queue of the next entry in the free list or 

in the list for an specific device, or X'FF" when it is the last entry in the free list or a 
device list. 

1-3 Contains the CCB/IORB address for the specified device. 

4 Contains the storage protection key for the I/O request, in the form X'nk', where 

n = user storage protection key. 

(Attention or system task (or if the request is from the LTA) = 0, BG task = 1 , 

FG task = 2—5, depending on the number of partitions). 

K = for Attention and all user tasks. 

System tasks: 

X'Or SNS 



X'02' 


DSK 


X'03' 


HAS 


XW 


PMGR 


X'05' 


PGT 


X'06' 


PGIN 


XW 


SUPV 


X"09' 


CRT 


X-OB- 


ERP 


X'OF- 


SVT 


Contains information on special proce 


X'80' 


Interrupt not yet processed 


X'40' 


Dequeue unconditional 


X"20' 


Reserved 


X'lO" 


Console buffering request 


X'OB" 


Reserved 


X'04' 


DASD file protect needed 


X'02" 


SYSFIL on CKD device 


X'Or 


SYSFI L on FBA device 



Contains pointer (displacement index) to the LUB table, identifying the logical unit 
making the I/O request. This is doubled to get the actual displacement into the LUB 
table. 

Contains the displacement within the PIB table of the PIB of the task requesting I/O. 

Contains information on the conditions encountered at SlO-time. 



X'FO' 
X"80' 
X'40' 
X'30' 
X'OF- 
X'OB- 
X'04' 
X'02' 
X'OI- 



Physical I/O information 
Device running 
Alternate channel I/O 
Reserved 

SIO condition code 
Condition code is 
Condition code is 1 
Condition code is 2 
Condition code is 3 



CHANNEL QUEUE TABLE (. . . Cont'd) 

9—1 1 Contains transmission information as passed from the user CCB/IORB (bytes 2, 3 
and 121. 

1 2 Reserved for page fixing routine. 

13—15 Address of internal fix list as returned from page-fix routine. 

16 Error retry count 

17-19 Contains the address of the PUB2 entry. 

20 Contains head queue related processing information: 

X'80' Reserved 

X'40' Head queue request 

X'20' Device busy status from PUB 

X'10' Queued-in-error from PUB 

21 Contains information on the requestor issuing the I/O request: 
X'04' RAS retry request 

X'FB' Reserved 

22 Contains information on the group of devices the device belongs to: 

X'80' CKD device or diskette 

X*40' FBA device 

X'20' Tape device 

X'10' Teleprocessing device 

X'08' 2260 or 3277 device 

X'04' Unit record device 

X'03' Reserved 

23 Contains information on where to continue I/O interrupt processing: 

X'OO' Dispatcher (DISP) 

X'04' I/O initiator (INITRG) 

X'08' I/O interrupt handler (INTRIN) 

X'OC I/O error IGNORE routine (IGNORE) 

X'10' CANCEL (ERR1A) 

X'14' CANCEL (ERR31) 

24—31 Contain the accumulated I/O interrupt information. 

CHANNEL CONTROL TABLE 

CHANTAB 



I 



CHANNEL 




CHANNEL 1 




CHANNEL 2 


— — "1 


CHANNEL 3 




CHANNEL 4 




CHANNELS 




CHANNEL 6 





ffl 



Channel Control Table (CHNTAB) 
Bytes 

X'10' Byte Multiplexer Channel 

X'11' Byte Multiplexer Channel with burst mode support 

X'13' Byte Multiplexer Channel running in burst mode 

X'20' Block Multiplexer Channel 

X'OO' Selector Channel 

X'80' Channel not operational or not present to the system 

1 Number of unit checks pending on this channel 

2 Flag Byte 

X'80' Channel must be restarted 
X'7F' Reserved 

3 Reserved 

4—7 Address of first PUB on channel 

8-1 1 Address of last PUB started on channel 

12-15 Address of PUB that needs channel exclusively 

Bytes 60-63 (X'3C'-X'3F') of the System Communication Region (SYSCOM) contain the 
address of the Channel Control Table. Label CHNTAB identifies the first byte of this table. 



TRACK HOLD (THTAB) TABLE 
THTAB 1 



"U 



THPTR THBWBTR - 

Flag and Count Byte - 



Track Hold Table (THTAB) 
Bytes 



d] 



The length of the table is determinded 
at supervisor generation time. 



Pointer to next entry in chain (forward pointer). All table entries belonging to one 

PUB are chained together. The chain delimiter is X'FF". 

1-3 CCB/IORB address 

4-11 For CKD devices: Addressof the track held, in the form BBCCHHOO. 

For FBA devices: Physical block number of first and last block of the range held. 

1 2 Pointer to previous entry (backward pointer). The first entry of the chain contains the 
PUB index. 

13 Flag and count byte: 

Bit 0: A task is waiting for this track or range of blocks. 

Bit 1: First entry of queue. Byte 12 contains PUB index. 

Bit 2, 3: Reserved 

Bit 4—7: Hold count: the number of holds is one more than this value. 

1 4, 1 5 Key of task owning this entry. 

Bytes 77-79 (X'4D'-X'4F') of the System Communication Region (SYSCOM) contain the address 
of the Track Hold table. Label THTAB identifies the first byte of the table. 

Byte 76 (X'4C') of the System Communication Region (SYSCOM) contains the address of the 
Track Hold Free List Pointer. Label THFLPTR identifies the location of the pointer. 



CONSOLE BUFFERING TABLE 
CBTAB 











ICBNEXTl 


<. «■ H 




ill 


= === 


HI 




|,S3 





as o 
^1 



CBCCW 


CBCCB 


cbdataU 



I CBNEXTJ points to next buffer entry 

Bytes 0-7 CCW: 

Command code, chain byte, and count field copied from the user's CCW. ' 
address is always the address of the data portion of the buffer entry. 

Bytes 8-23 CCB/IORB: 

The CCB/IORB used by the console buffering routine. The CCW address is 
the address of the CCW in the buffer entry. 

Bytes 24—103 Contains the data moved from the requestor's output area. 



Label CBTAB identifies the first byte of the Console Buffer. 



LINE MODE TABLE 



MODJAB 



t 



^B I I 

3 



The first 4 bytes of the table 

Maximum number of start/stop lines. Set by the lOTAB macro 
at system generation. 

Maximum number of BSC lines. Set by the lOTAB macro at 
system generation. 

Actual number of start/stop lines. Determined by DVCGEN 
macros at system generation and ADD commands at IPL. 

Actual number of BSC lines. Determined by DVCGEN macro 
at system generation and ADD commands at IPL. 



Line Mode settings for 

Model 1 15/125 Comm. Adapter 



Bytes 140-143 (X'8C'-X"8F*) of the System Communication Region (SYSCOM) contain the 
address of the table. Label MODTAB identifies the first byte of the table. 

This table is required by the models 1 15/125 only and is used to save the TP mode at IPL time. 



RELATIONSHIP OF CONTROL AND WORKBLOCKS FOR CHANNEL PROGRAM FIXING 



Workblock MGMT Information 






FHB1 






X'OO' 


PTRtoFHB 


^ 


X'OO" 












X'04' 


PTRtoFRB 


X'04' 


PTR to next FHB 








X"08' 


PTR to Workblocks 














Workblod 






X'20' 


PTR to next FLB (Fixlist) 






FRB1 






X'OO" 

i 

X'24' 


Begin of copy blocks 






x-oo- 


Flag byte 




X'Or 


Flag byte 1 






X'02' 


TIK/PIK requester 




X'04' 


PTR to Setflag RTN 




X'08" 


PTR to Statusmodifier 




X'OC 


PTR to Contrl. Comm. List 




X'10' 


PTR to FHB (Fixlist) 




X'14' 


PTR to LINEPTR Stack 




X'18' 


PTR to Lorate List 




X'20" 


Workfile 




X'34" 


Savearea 




X'74' 


PTR to next FRB 



LAYOUT OF FIXLIST HEADER BLOCK 



X'OO- 


Flag Byte 1 
(General 
Fixing 
Function) 


Flag Byte 2 
(Reserved) 


TIK/PIKof 
Requestor 


X'04' 


Pointer to next active FHB | 


X'08' 


BA1 


EA1 


X'OC 


BA2 


EA2 


X'10" 


BA3 


EA3 


X'14' 


BA4 


EA4 


X"18' 


BAB 


EA5 


X'lC 


BA6 


EA6 


X"20" 


Pointer to next fixlist block 



Note: 

Bytes 0-3 (X'00'-X'03') of the 
Workblock Management In- 
formation contain the address 
oftheFHBI. 



Layout of Fixlist Header Block (FHB) for General Fixing 
Function 

Flag Byte 1 (General Fixing Function): 

Bit = 1 Fixing function request complete. 

Bit 1 = 1 At least one page is fixed for this task or the fixing 

request is pending. 
Bit 2 = 1 Fixing of pages required. 
Bit 3-7 Reserved 



FHBn 



X'OO- 


Flag Byte 1 
(General 
Fixing 
Function) 


Flag Byte 2 
(Fast 
Fixing 
Support) 


TIK/PIKof 
Requestor 


X'04" 


Saved queue forward pointer 


X'OB- 


Saved queue backward pointer 


X'OC 


Pointer to replica or zero 


X'10' 


Pointer to next active FHB 


X'14* 


BA1 


EA1 


X'lB- 


BA2 


EA2 


X'lC 


BA3 


EA3 


X'20' 


Pointer to next fixlist block | 



Note: 

Bytes 16-19 (X'14'-X'17') of 
the Fix Request Block (FRB) 
contain the address of the Fix- 
list Header Block (FHB). 



Layout of Fixlist Header Block (FHB) for Fast Fixing 
Support 

Flag Byte 2 (Fast Fixing Support): 

Bit = 1 Fast fixing in progress. 

Bit 1 = 1 FHB belongs to saved FHB queue. 

Bit 2-7 Reserved 



FIX REQUEST BLOCK 



X'OO" 


Flag byte 


X'or 


Flag byte 1 


X'02' 


TIK/PIK requester 


X'04- 


PTR to Setf lag RTN 


X*08' 


PTR to Statusmodif ier 


X'OC 


PTR to Contrl. Comm. List 


X'10' 


PTR to FHB (Fixlist) 


X'14' 


PTR to LINEPTR Stack 


X'18' 


PTR to Locate List 


X"20- 


Workfile 


X'34' 


Savearea 


X'74' 


PTR to next FRB 



Note: 

Bytes4-7 (X'04--X'07') of Work- 
block MGMT Information contain 
the address of Fix Request Block 
(FRB). 



Fix request Block Example 

Flag ByteO: 

Bit Data chaining specified 

Bit 1 READ/SENSE command 

Bit 2 READ BACKWARD command 

Bit 3 Status modifier command (STM) and data chaining 

Bit 4 Status modifier command (STM) 

Bit 5 Status modifier handling in process 

Bit 6 Reserved 

Bit 7 DOlO request (Routine CCWDOIO) 

Flag byte 1 (Fast Fixing Support): 

Bit = 1 Replica creation required 
Bits 1-7 Reserved 



LAYOUT OF FIXLIST BLOCK (FLB) 



X'OO- 


BA1 


EA1 


X'04' 


BA2 


EA2 


X'OB- 


BA3 


EA3 


X'OC" 


BA4 


EA4 


X'10" 


BA5 


EA5 


X'14- 


BA6 


EA6 


X'lB- 


BA7 


EA7 


X'lC 


BAB 


EA8 


X-20' ' 


Pointer to next fixlist block or zero 1 



Note: 

Bytes 4-8 (X'04'-X'08') of the 
Fixlist Header Block (FHB) 
contain the address of the Fix- 
list Block (FLB). 



Layout of Fixlist Block (FLB) 



LAYOUT OF LOCATE LIST BLOCK 



Locate List Block 1 



BA1 


EA1 


BA2 


EA2 


X'OO 00 00 00' 








Pointer to 
Next Block 





Locate Block 2 



BA4 


EA4 


X'OO 00 00 00- 












Pointer to 
Next Block 





Locate List Block Exampel 



LAYOUT OF LINE POINTER BLOCKS 



Note: 

Bytes 24-27 (X'IB'-X'IF') of 
FRB contain the address of 
Locate List Block 1. 



Free Entry 


Free Entry 


^^ LPS 


LP7 


LPe""^- 


Pointer to Current 
Entry Block 


Pointerto 
Next Block 





Note: 

Bytes 20-23 (X"14'-X'17') of 
FRB contain the address of Line 
Pointer Block. 



\ LPS 


LP4 


'^^P3 


LP2 


LP1 "^^•^- 


Pointer to Current 
Entry in Block 


X'OO 00 00 00- 





Line Pointer List Example 



EMULATOR ECB TABLE (EUECBTAB) 
EUECBTAB 
Attention Task 



Bytes 104-107 (X'68'-X'6B') of the System Communications Region (SYSCOIVi) contain tiie 
address of the Emulator ECB Table. Tabel EUECBTAB identifies the first byte of the table. 



- 8 bytes - 



■~~^^_o 



Reser- 
ved 



Address of Reserved 
Page Frame Table Entry 



Bytes 
0,1: 



TIK of task issuing the PFIX request; inserted when the PFIX request is started. 

Flag byte. Set when the PFIX request is started. 

X'00' = PFIX request 
X'40' = PFIX restart request 
X"80' = GETREAL request 



DENSITY DATA 



Density 


Parity 


Convert 


Translate 


SS Code * 


(Bytes per inch) 




Feature 






200 


odd 


on 


off 


10 


200 


odd 


off 


off 


30 


200 


odd 


off 


on 


38 


200 


even 


off 


off 


20 


200 


even 


off 


on 


28 


556 


odd 


on 


off 


50 


556 


odd 


off 


off 


70 


556 


odd 


off 


on 


78 


556 


even 


off 


off 


60 


556 


even 


off 


on 


68 


800 


odd 


on 


of 


90 


800 


odd 


off 


off 


BO 


800 


odd 


off 


on 


B8 


800 


even 


off 


off 


AO 


800 


even 


off 


on 


A8 


800 


dual density nine 






C8 






1600 


dual density nine 






CO 






6250 


dual density nine-track 





DO 


800 


single density nine-track 





CO 


1600 


single density nin 






CO 






6250 


single density nine-track 








* Refer to PUB Table, byte 5 



EVENT CONTROL BLOCK (ECB) 



Reserved 


Reserved 






Reserved 


1 


2 3 


1 









X'80' 
X-CO" 



Normal termination of subtask 
Abnormal termination of subtask 



RESOURCE CONTROL BLOCK (RCB) 





Reserved 




ECB Address 



1 3 4 5 6 7 

Byte X'FF" if resource is in use, X'OO' if resource is not in use 

Bytes 1-3 Reserved 

Byte 4 Bit = 1 Another task waiting for the resource 

Bit 1 = 1 No other task waiting for the resource 
Bytes 5—7 ECB address of current resource owner 

CROSS PARTITION ECB (XECB) TABLE 



XECB name 


Access 
code 


XECB 

address 


Task ID 
of owner 


Task ID 
of waiter/ 
poster 



7 8 9 11 12 13 14 1 

Byte 8 

ParameterlistforTYPE = DEFINE 

Bytes 0-7 XECB name 

Byte 8 X'On', bits 4—7 contain the access code 

Paramterlist for TYPE = DELETE or DELETALL or RESET or CHECK 

Bytes 0-7 XECB name 

Bytes 8-9 X'1000' TYPE = RESET 

X'4000' TYPE = DELETE 

X'4800' TYPE = DELETALL 

X'8000' TYPE = CHECK 



DSKPOSBG 


BGDIB 
Table 


DSKPOSFn 


FnDIB 
Table 




^^^=^ 


DSKP0SF2 


F2DIB 
Table 


DSKP0SF1 


F1 DIB 
Table 



The number of DIB tables depends 
on the number of partitions speci- 
fied at supervisor generation. 





Format of anv 



DIB table if SYSFIL = YES 


g 


10 












,e 


17 


18 


19 


20 


2, 


22 


23 1 




Current Address 


K D D 


End Address 


UL 


LL 


M 


RC 


1 


SYSLNK 


c 


C 


H 


H 


00 


00 


00 


P 


P 


00 


00 


00 


00 


00 


00 


00 


00 


00 


00 


00 


00 


00 


00 


00 


SYSIN 


B 


B 


C 


C 


H 


H 


R 


00 


00 


50 


B 


B 


C 


C 


H 


H 


R 


H 


H 


XX 


XX 


XX 


00 


00 


SYSPCH 


B 


B 


c 


c 


H 


H 


R 


00 


00 


51 


B 


B 


C 


C 


H 


H 


R 


H 


H 


XX 


XX 


XX 


00 


00 


SYSLST 


B 


B 


C 


C 


H 


H 


R 


00 


00 


78 


B 


B 


C 


C 


H 


H 


R 


H 


H 


XX 


XX 


XX 


00 


00 


PRCDIB 


B 


B 


C 


C 


H 


H 


R 


00 


00 


50 


B 


B 


C 


C 


H 


H 


R 


H 


H 


XX 


XX 


XX 


00 


00 





Format of anv 



DIBTableifSYSFIL = NO 

ah 


9 


10 


,e 


17 


18 


19 


20 1 21 22 23 




Current Address 


K D 


D 


End Address 


UL 


LL 


M 


RC 


SYSLNK 


C 


C 


H 


H 


00 


00 


00 


P 


P 


00 


1 


PRCDIB 


B 


B 


C 


C 


H 


H 


R 


00 


00 


50 


B 1 B |C |C |l- 


1 H 1 R 1 H 1 H |Xx|xx|xx|00 |00 1 





Format of 3540 Diskette DIE 



Tab 
6 


e 
7 




9 


10 












16 


17 


18 


19 


20 


2, 


22 


23 1 




Current Address 


K D D 


End adress 






M 


RC 




SYSIN 


00 


00 


00 


00 


c 


H 


R 


00 


00 


00 


FLG 


EXT 

# 


HDR 

# 


00 


c 


H 


R 


00 


00 


XX 


00 


00 


00 


00 


SYSPCH 


00 


00 


00 


00 


c 


H 


R 


00 


00 


00 


FLG 


EXT 

# 


HDR 

# 


00 


c 


H 


R 


00 


00 


XX 


00 


00 


00 


00 


SYSLST 


00 


00 


00 


00 


c 


H 


R 


00 


00 


00 


FLG 


EXT 

# 


HDR 

# 


00 


c 


H 


R 


00 


00 


XX 


00 


00 


00 


00 



DISK INFORMATION BLOCK (DIB) TABLE (. . . Cont'd) 



Bytes 0-6 Current address 

Bytes 0—5 Current address of key: the next address to be used (both for input 

and output). 
Byte 6 Record number of current address. 

Bytes 7-9 KDD 

Key and data length of the symbolic device. 

PP: starting cylinder of private core image library if PCIL is assigned; othenwise zero. 

Bytes 10-16 End address 

Bytes 10-15 

16 



End address of key; the last address within the limits of the extent. 
Record number of end address. 



Byte 17 
Byte 18 
Byte 19 
Byte 20-21 



Byte 22 
Byte 23 



UL Upper head limit 

LL Lower head limit 

M Maximum number of records per track. 

RC Record count: residual capacity for beginning of operator notification. Set a 
system generation time withSYSFIL parameter, or after IPL with SET state- 
ment (RCLST and/or RCPCH operands). 

A warning message is issued by job control after end-of-job step when the 
minimum number of remaining records has been reached or exceeded during 
the previous job (not supported for 3504). 

X'40' Indicates RFS support 

Reserved 



Label DSKPOSBG identifies the first byte of the BG Dl B table. 

The address of the DIB tables are contained in bytes 96 and 97 (X'60'-X'61') of the appropriate 
partition communication region. 

DIB Table for FBA devices 



Byte(s) 


Label 


Description 


0-3 


ULPBN 


End addres of extent. Upper limit of physical block number 


4-7 


CRPBN 


Current address. Current physical block number 


8,9 


CIOFF 


Offset of current record within control interval 


10,11 


LNGCI 


Length of control intervals in bytes 


12 


PBPERCl 


Number of physical blocks per control interval 


13-15 


PBUFFER 


Pointer to data buffer 


16 


DIBFLAGS 


X'Or Buffer-in-use f lag 

X'02* End of extent reached 

X'04' Force write out 

X'lO- Source begin readjustment required 

X'40' Task waiting for DIB 

X'80' DIB gage flag 


17-19 


PDIBX 


Pointer to DIB extension (DIBX). 


20,21 


DIBRSCNT 


Residual count for JCL message 


22,23 




Reserved 



A FBA device also requires a DIB extension (DIBX) table. It has the following format: 



Byte(s) 


Description 


0-23 


lORB 


24-31 


Fixlist first area 


32-39 


Fixlist second area 


40-47 


DEFINE EXTENT CCW 


48-55 


LOCATE CCW 


56-63 


READ/WRITE CCW 


64-79 


Parameter field for DEFINE EXTENT CCW 


80-87 


Parameter field for LOCATE CCW 



Disk Information Block Extension Table (DIBX) for FBA Devices 



TABLES FOR MICR DTF ADDRESSES AND POINTERS 



The table of DTF addresses (PDTABB) contains six 8-byte entries; one for each line of the direct 
control feature on the system. 



Byte 


1 1 1 2 1 3 


4 


5 1 6 1 7 


AND instruction 


Owner 

ship 

Flags 


DTF address for MICR 



8 
16 
24 
32 
40 


Nl PDSTAT+1 X'FE- 
Nl PDSTAT+1 X'FD' 
Nl PDSTAT+1 X'FB' 
Nl PDSTAT+1 X'F7' 
Nl PDSTAT+1 X'EF' 
Nl PDSTAT+1 X'DF' 




Device on line 7 
Device on line 6 
Device on line 5 
Device on line 4 
Device on line 3 
Device on line 2 



Bytes 0-3 



The Nl instruction is executed in main line coding to turn off the external line 
status after its detection. 

PDSTAT+1 will contain one more of the following interrupt codes: 



External interrupt 


Interrupt Code 


External interrupt 


code bit 


(byte X'87') 


cause 


15 


nnnnnnni 


External signal 7 


14 


nnnnnnin 


External signal 6 


13 


nnnnninn 


External signal 5 


12 


nnnnlnnn 


External signal 4 


11 


nnnlnnnn 


External signal 3 


10 


nnlnnnnn 


External singal 2 



n = other external interrupt conditions 

Byte 4 Contains the flag of the partition containing the DTF 

Background = 10 
Foreground = 10—50, depending on the number of partitions 

Bytes 5-7 Contain the address of the DTF table 

Table of pointers (PDTABA) to DTF addresses with the external interrupt line. The table is set 
up to handle the status in descending order from bit 15 to bit 10 of the external interrupt code. 



Byte 





1 


2 


3 


4 


5 


6 


7 





00 


08 


00 


10 


00 


08 


00 


18 


8 


00 


08 


00 


10 


00 


08 


00 


20 


16 


00 


08 


00 


10 


00 


08 


00 


18 


24 


00 


08 


00 


10 


00 


08 


00 


28 


32 


00 


08 


00 


10 


00 


08 


00 


18 


40 


00 


08 


00 


10 


00 


08 


00 


20 


48 


00 


08 


00 


10 


00 


08 


00 


18 


56 


00 


08 


00 


10 


00 


08 


00 





Bytes 126 and 127 (X'7E'-X'7F') of the partitions communication region contain the address of 
these tables. Label PDTABB identifies the first byte of the first table. The tables are also used for 
optical reader/sorters. 



ERROR RECOVERY PROCEDURE INFORMATION BLOCK (ERPIB) 
ERPIBQ 



Byte 20 



csw 


Sense 
Information 


PUB 
Pointer 


Channel 
Queue Pointer 



Reserved 


iVlessage 


T 


Flag Byte 


Extended 
CSW 


17 


18 


19 




20 21 23 

Requestor Identification 



Flag Byte: 

Bit 1 = 
Bit 1-4 

5 1 = 

6 1 = 



Channel Check on SIO 

Reserved 

Sense data stored 

DASD ERPIB active 

Reserved 



Note: 

A free entry is indicated by X'FF" in byte zero, end of queue is indicated by 'FF' in byte zero. 

Label ERPIBQ identifies the first byte of queue. 



Name of phase 
to be fetched 



Branch address 
to retry the 
failing operation 



Branch address 
to ignore the 
error 



Branch address 
to cancel the 
task 



Return address 
for A-transient 



The A-transient loads one of these addresses in 
register 14 before branching to the return address 
(see bytes 20-23). 



The address of the ERBLOC can be found in SYSCOM at Displacement (X'OO"). 



First error queue entry 



Last error queue entry 



Error queue entries (44 bytes each) 

The number of entries is determined at supervisor generation. 



Layout of an error queue entry for I/O error or BTAM 
Bytes 0-7 CSW 



< Bytes 8-9 


Address of PUB for device in error 


B Byte 10 


Flag byte: 






Bit 1 

1 


= No record found on DASD 
= Intervention required 




2 


= Passback (set by device ERP) 




3 1 


= Allow ignore 




4 f 


-orce automatic retry 




6 S 


>ense command outstanding 




7 1 


= Active entry 



Message code: may refer to a device error recovery message generated by physical 
IOCS (See Cancel Codes and Messages) or: 

This location may contain one of the following: 

X'E2' The error is recoverable 

X'AE' A record is to be recorded on the system recorder file 

and a physical transient is to be fetched (last two 

characters of phase name are in bytes 20— 21 ). 



CKD devices: 
Bytes 12-15 



FBA devices: 
Byte 12 



Disk seek address. For an alternate entry, this field contains the address of the 
PUB of the originating routine. 



OS FBA device type code 

Bytes 13-15 X'OO' 

Byte 16 PUB channel queue pointer 

Bytes 17-19 Address of CCB/IORB 

Bytes 20-43 Sense data or alternate entry name: If byte 1 1 contains X'AE', bytes 20-21 

contain the last two characters of the phase name of the physical transient to be 
fetched. 



CANCEL CODES AND MESSAGES 



Cancel 
Code (hex) 


Message 
Code 


Description part of Message or Condition 


Label 


00 




In all cases default value exept those listed 




OA 


0S21I 


Processing error in access control 


ERROA 


OB 


0S20I 


Access control violation 


ERROB 


OC 


0S19I 


Execution failure in ICCF pseudo partition 


ERROC 


OF 


OP80I 


Invalid 'read from/or write' to system file on FBA 
device 


ERROF 


10 




Normal EOJ 


ERR10 


11 


0V07I 


No channel program translation for unsupported 
device 


ERR11 


12 


0V06I 


Insufficient buffer space for channel program 
translation 


ERR12 


13 


0V05I 


CCW with count greater than 32 K 


ERR13 


14 


0V04I 


Page pool too small 


ERR14 


15 


0V02I 


Page fault in disabled program 


ERR15 


17 


0S02I 


Program request (Same as 23 but causes dump 
because subtasks were attached when maintask 
issued CANCEL macro.) 


ERR17 


18 




Elimates cancel message when maintask issues 
DUMP macro with subtasks attached 




19 


0P74I 


I/O operator option 


ERR19 


1A 


0P73I 


I/O error 


ERR1A 


IB 


0P82I 


Channel failure 


ERR1B 


1C 


0S14I 


CANCEL ALL macro 




ID 


0S12I 


Main task termination 




IE 


0S13I 


Unknown ENQ requestor 




IF 


OPS 11 


CPU failure 


ERR1F 


20 


0S03I 


Program check 


ERR20 


21 


0S04I 


Illegal SVC 


ERR21 


22 


0S05I 


Phase not found 


ERR22 


23 


0S02I 


Program request 


ERR23 


24 


0S01I 


Operator intervention 


ERR24 


25 


0P77I 


Invalid address 


ERR25 


26* 


0P71I 


SYSxxx not assigned (unassigned LUB Code) 


ERR26 


27 


0P70I 


Undefined logical unit 


ERR27 


2A 


GV10I 


I/O error on page data set 




2B 


0P841 


I/O error during fetch from PCI L 


ERR2B 


2C 


0V09I 


Illegal parameter passed by PHO routine 


ERR2C 


2D 


0P88I 


Failing strorage block (program cannot be executed) 


ERR2D 


2E 


0S16I 


Invalid resource request (possible deadlock) 


ERR2E 


2F 


0V03I 


More than 255 PFIX requests for 1 page 


ERR2F 


30 


0P72I 


Reading past/&statement (on SYSRDR or SYSIPT) 


ERR30 


31 


OP75I 


I/O error queue overflow (error queue overflow) 


ERR31 


32 


0F76I 


Invalid DASD address 


ERR32 


33 


0P791 


Invalid first CCW 




34 




Reserved 




35 


0P85I 


Job control open failure 


ERR35 


36 


GV08I 


Program check or page fault in I/O appendage routine 


ERR36 


37 




Reserved 




38 


0V11I 


Wrong privately translated CCW 


ERR38 


39 




Reserved 





I 



CANCEL CODES AND MESSAGES (. . . Cont'd) 



Cancel 
Code (hex) 


Message 
Code 


Description part of Message or Condition 


Label 


40 


5J97I 


ACFA/TAM error (invalid condition code) 




41 


5J97I 


ACFA/TAM error (invalid condition code) 




42 


0P86I 


Violated DASD file Protection 




XX 


0P78I 


Unrecognized Cancel Code 






0P83A** 


Supervisor catalog failure 






0P87A** 


IPL Failure 





* If the CCB/IORB is not available, the logical unit is SYSxxx. 

•• The cancel code is not significant in case of a supervisor catalog or IPL failure, because the 
system is placed in the wait state without any further processing by the terminator. 

XX Any other DIGITS. 



PUB2 ENTRY ADDRESSING 

SYSCOM 



? 



L. 



0— 



nt 



How to find the PUB2 entry for a device: 

[T] Subtract from the address of the device 
PUB, the PUB Table start address and 
devide the result by 4. 

[2] Find in the RF Table a displacement 64 
(X'40') the PUB2 Index Table. 

[3] Use the result from 1 as a displacement 
into the PUB2 Index Table. This will give 
you the two bytes index (i. e. displacement) 
of the PUB2 entry of the device PUB. 

[4] Fint in the RF Table at displacement 60 
(X'3C') the address of the PUB2 AREA. 

[5] Use the value from 3 as a displacement 
inthePUB2AREA. 



m- 



•■58 Length of PUB2 AREA 



+60 Length of PUB2 AREA 



+64 PUB2 INDEX TABLE 



2 bytes entries giving the 
displacement from the be- ■ 
ginning of the PUB2AREA , 



I 



See PUB2 for the format of 
the entries for the various 
device types 



PUB 2 Table Entry Format for Unit Record and Unsupported Devices 



Decimal 
Displace- 
ment 


Byte 
Length 


Description 



3 

4 
5 
6 


3 

1 

1 
1 
6 


Usage Count (number of non-ERP SIOs) 
Flag Byte: Bit 0: 1 = Device in intensive mode 
Bit 1 : 1 = Device in diagnostic mode 
Bit 2: 1 = No recording mode 
Bit 3: 1 = Call statistics transient 2 
Bit 4: 1 = Use PUB 2 name completion field 
Bit 5: 1 = Volume opened on this device 
Bit 6, 7: Reserved 

CE mode limit byte 
CE mode byte/bit mask 
Statistical data counters 


Total length 12 | 



PUB 2 Table Entry Format for DASD 



Decimal 
Displace- 
ment 


Byte 
Length 


Description 





3 


Usage Count (number of non-ERP SIOs) 


3 


1 


Flag byte: Bit 
Bit 1 
Bit 2 
Bit 3 
Bit 4 
Bit 5 
Bit 6, 7 


1 = Device in intensive mode 

1 = Device in diagnostic mode 

1 = No recording mode 

1 = Call statistics transient 2 

1 = Use PUB 2 name completion field 

1 = Volume opened on this device 

Reserved 


4 


1 


CE mode limit byte 


5 


1 


CE mode byte/bit mask 


6 


1 


Flag byte: Bit 0: 1 = Soft DASD error is queued 

Bit 1 : 1 = ERP requests logging of error 
Bit 2-7: Reserved 


7 


2 


Reserved 


9 


1 


Physical module identifier 


10 


6 


Volume serial number 


End 3340 


Total length 16 


16 


8 1 Statistical data counters 


End 231 1 and 2314/2319 Total length 24 | 


24 


8 1 Additional statistical data counters (3330, 3350, and FBA) 


End all oth 


er DASD Total length 32 



PUB 2 Table Entry Formats for Tapes 



Decimal 
Displace- 
ment 


Byte 
Length 


Description 



3 

4 
5 
6 


3 

1 

1 
1 
2 


Usage Count (number of non-ERP SIOs) 

Flag Byte: Bit 0: 1 = Device in intensive mode 
Bit 1 : 1 = Device in diagnostic mode 
Bit 2: 1 = No recording mode 
Bit 3: 1 = Call statistics transient 2 
Bit 4: 1 = Use PUB2 name completion field 
Bit 5: 1 = Volume opened on this device 
Bit 6, 7: Reserved 

CE mode limit byte 

CE mode byte/bit mask 

Name of ERP that wants control 



PUB 2 TABLE (. . . Cont'd) 



PUB 2 Table Entry Formats for Tapes 



Decimal 


Byte 


Description 


Displace- 


Length 




ment 






8 


1 


Flag byte 1: Bit 


1 = Unsolicited interrupt 






Bit 2 


1 = ERP is in control 






Bit 3 


1 = ERP requests repositioning 






Bit 4 


1 = Use original TIE byte* 






= Use opposite TIE byte * | 






Bit 5 


1 = Intercept next SIO request * 






Bit 6 


1 = ERP read opposite request * 






Bit 7 


1 = Restart user's CCW chain * 


9 


1 


Flag byte 2: Bit 


1 = Last ERP operation was ERG * 






Bit 1 


1 = Last ERP operation was reposition * 






Bit 2 


1 = Cleaner action in progress * 






Bit 3 


1 = Read Opposite Recovery in progress * 






Bit 4 


1 = Message stored in P20RGTIE 






Bit 5 


1 = Erroronattemptto recover by repositioning * 






Bit 6 


1 = Data check after ERP in control * 






Bit 7 


Reserved 


10 


1 


Flag byte3*: Bit 


1 = Failing CCW is Write or Control command 






Bit 1 


1 = User reading backwards 






Bit 2 


1 = Read Opposite Recovery (ROR) 






Bit 3 


1 = Maximum ROR retries 






Bit 4 


1 = Command chaining ROR 






Bit 5 


1 = ROR suppressed incorrect length 






Bit 6 


1 = User used SI LI (Suppress Incorrect Length 






Indicator) 






Bit 7: 1 = Reserved 


11 


1 


Temporary read count 




8 


Save Area for 1st 8 sense bytes (8809) 


12 


1 


Temporary write count 


13 


1 


Noise record count 


14 


2 


Erase gap count 


16 


2 


Cleaner action count 


18 


1 


Permanent read errors count 


19 


1 


Permanent write errors count * 


20 


1 
1 


TIE original direction 

SAVE AREA for message number (8809) 


21 


1 


TIE opposite direction * 


22 


1 


ERP counter * 


23 


1 


ERP counter 1 * 


24 


8 


ERP work area 


32 


6 


Tape serial number 


38 


2 


Block Length 


40 


4 


User ROR command address from CSW 




8 


User CCW area during rewind/unload (8809) 


44 


2 


User ROR residual count from CSW 


46 


2 


Reserved 


48 


16 


Work area for rewind-unload error action 




24 


SAVE AREA for last 24 sense bytes (8809), end of 8809 entry: total 
length 72 bytes 


64 


10 


2400-series statistical data counter area 


74 


2 


Reserved 


End 2400- 


eries: Tota 


1 length 76 


64 


20 


3410/3420 statistical data counter area 


End 3410/3420: Total length 84 | 



I 



* Fields not used for 3402 tape entry 



PUB 2 TABLE {. . . Cont'd) 



PUB 2 Table Entry Format for 3886 Optical Character Reader 



Decimal 


Byte 


Description 


Displace- 


Length 




ment 









3 


Usage count (number of non-ERP SIOs) 


3 


1 


Flag byte: Bit 0: 1 = Device in intensive mode 
Bit 1 : 1 = Device in diagnostic mode 
Bit 2 : 1 = No recording mode 
Bit 3 : 1 = Call statistics transient 2 
Bit 4: 1 = Use PUB2 name completion field 
Bit 5: 1 = Volume opened on this device 
Bit 6, 7: Reserved 


4 


1 


CE mode limit byte 


5 


1 


CE mode byte/bit mask 


6 


20 


Statistical data counters 


End 3886 


Total length 26 j 



PUB 2 Table Entry Format for 3540 Diskette 



Decimal 


Byte 


Description 


Displace- 


Length 




ment 









3 


Usage Count (number of non-ERP SIOs) 


3 


1 


Flag byte: Bit 0: 1 = Device in intensive mode 
Bit 1 : 1 = Device in diagnostic mode 
Bit 2 : 1 = No recording mode 
Bit 3: 1 = Call statistics transient 2 
Bit 4: 1 = Use PUB2 name completion field 
Bit 5 : 1 = Volume opened on this device 
Bit 6, 7: Reserved 


4 


1 


CE mode limit byte 


5 


1 


CE mode byte/bit maske 


6 


8 


Statistical data counters 


14 


1 


Bit 0-5: Reserved 

Bit 6: 1 = System file opened by Job Control 

Bit 7: 1 = System file opened by Problem Program 


15 


1 


Reserved 


End 3540 


Total len 


gth16 



RECORDER FILE TABLE (RF TABLE) 



Displacement 


Label 


Byte 
Lengt 


Description 


Dec 


Hex 


h 






RFTABLE 




Label of Starting Address 








RFFLAGS1 


1 


Bit 
Bit 1 
Bit 2 
Bit 3 
Bit 4 
Bit 5 
Bit 6 
Bit 7 


1 = File full 

1 = RDE option included 

1 = Initial IPL 

Reserved 

1 = File is to be created 

1 = File has been created 

1 = File is on FBA device 

1 = File open and ready 


1 


1 


RFFLAGS2 


1 


Bit 
Bit 1 
Bit 2 
Bit 3 
Bit 4 
Bit 5 
Bit 6 
Bit 7 


1 = File full message request 
1 = Threshold message request 
1 = I/O error message request 
1 = Data lost message request 
1 = EVA message request 
1 = File owned by RTA recorder 
1 = File owned by PTA recorder 
1 = File being accessed by EREP 


2 


2 


RFLAGS3 


1 


Bit 
Bit 1 
Bit 2 
Bit 3 
Bit 4 
Bit 5 
Bit 6 
Bit 7 


1 = Last track message issued once 

1 = Error is to be recorded 

1 = Short form records request 

1 = Individual records for unlabeled tapes 

1 = Reserved 

1 = Reserved 

1 = Exit to SSBOMT05 indicator for SSBOPEN 

1 = Exit to SSBOMT01 indicator for SSBOPEN 


3 


3 


RFFLAGS4 


1 


Work area switches for various transients including BTAM 
Bit 0: 1 = Multiple records required (PRT1, 3895, 

recording) 
Bit 1 : 1 = PLB record required (PRT1 recording) 

OBR record required (3895 recording) 
Bit 2: 1 = FCB record required (PRT1 recording) 

iVlDR records required (3895 recording) 










Bit 3 


1 = UCB record required (PRT1 recording) 










Bit 4 


1 = Ignore exit requested (PRT1 recording) 










Bit 5 


Reserved 










Bit 6 


1 = Retry exit requested 










Bit 7 


1 = Record not written 


4 


4 


RFFLAGS5 


1 


Reserved 


5 


5 


RFNOFN 


1 


N of N records (low order 4 bits contain the number of 
records to be recorded and high order 4 bits contain the 
record number being processed 


6 


6 


RFRECTYP 


1 


Record type code 


7 


7 


RFREL 


1 


DOS/VS ID-Release Level code 


8 


8 


RFRDSW1 


1 


Record dependent switch 1 


9 


9 


RFRDSW2 


1 


Record dependent switch 2 


10 


A 


RFBUFLG 


2 


Length of data buffer (FBA) 


12 


C 


RFMCONST 


2 


Multiplier for track balance (CKD) 






RFBUFAD 


4 


Address of data buffer (FBA) 


14 


E 


RFDCONST 


2 


Divisor for track balance (CKD) 


16 


10 


RFOCONST 


2 


Overhead track for balance (CKD) 






RFNAVR 


(2) 


Displacement of next available RDF in buffer (FBA) 


18 


12 


RFRECLEN 


2 


Length of record 


20 


14 


RFTIMEA 


4 


Address of RMSR time entry 


24 


18 


RFRECADR 


4 


Address of record 


28 


1c 


RFSEEK 


7 


Work area for seek address (BBCCHHR)'(CKD) 






RFCUBL 


(4) 
(3) 


Work area for block number (FBA) 
Reserved 



I 



RECORDER FILE TABLE (RF TABLE) (. . . Cont'd) 











35 


23 


RFEREPK 


1 


Key of EREP partition 


36 


24 


RFHDRCH 
RFHDRBL 


4 
(4) 


SYSREC cylinder/head (CKD) 
SYSREC bloci< number (FBA 


40 


28 


RECHMAP 


2 


Map of supported channels 


42 


2A 


RFCHIDC 


8 


ChannellD codes 


50 


32 




2 


Reserved 


52 


34 


RFEXIT 


4 


Exit phase name or exit address 


56 


38 


RFEVARTH 


1 


EVA read threshold 


57 


39 


RFEVAWTH 


1 


EVA write threshold 


58 


3A 


RFP2ENTL 


2 


Length of PUB2 Entry Area 


60 


3C 


RFP2ENT 


4 


Address of PUB2 Entry Area 


64 


40 


RFP2ITAB 


• 


PUB2 Index Table 



' Two bytes are generated for each PUB2 entry in the system. (See PUB2 Entry Addressing for 
using the PUB2 Index Table to access the PUB2 entries. 

Bytes 100-103 {X'64'-X'67') of the system communication region (SYSCOM) contain the 
address of the Recorder File Table. Label RFTABLE identifies the first byte of the table. 



CRT CONSTANT TABLE (CRTTAB) 



Name of 
CRT Routine 


Dummy 

Sense 

Byte 


Address of 
CRT 
Save Area 


Flag 
Bytel 


Address of 
CRT 
Trans. Area 


Flag 
Byte 2 


Address of 
System Task 
Save Area 


CRT error 
Information * 



* limited channel logout is saved here 

Byte 8 - Sense byte: 

Bit 1 = Command reject 

Bit 1 1 = Intervention required (only if Console Printer is attached) 

Bit 4 1 = Equipment check {only if Console Printer is attached) 

Bit 7 1 = Operation check 

or: this byte is used for saving Name Indicator 



Byte 12- Flag byte 1: 



X'80' 


ERP message 


X'40' 


Unit check for CRT 


X'20' 


CRT Fetch bound 


X'lO- 


Device End simulated 


X'08' 


Validation error 


X"04' 


Redisplay mode 


X'02' 


CRT error 


Byte 16 


— Flag Byte 2: 


X'80' 


CRT busy 


X'40' 


Sense byte prepared 


X'20' 


End of CRT routine 


X'lO- 


Data already read 


X-08' 


Attention pending 


X'04' 


Request pending 


X'02' 


Attention request 


X'OV 


EOJonCRT 



I 



Bytes 52-55 {X'34'-X'37') of the System Communication Region (SYSCOM) contain the 
address of the CRT CONSTANT Table. Label CRTTAB identifies the first byte of the table. 

The first byte of this address, byte 52, inidcates the type of the generated CRT support. The 
bits have the follovi/ing meaning: 

Bits 0-5 Reserved 

Bits 6—7 Indicate the support for the operator console that has been generated in the supervisor: 

00 = Typewriter 

01 = 125 D 

11 = 3277/3278 



PROGRAM CHECK OPTION TABLE 
PCTAB 



3 


4 7 


PC Routine Address 


Save Area Address 



Bytes 0-3 No STXIT issued: zero 

SIXT issued: Address of the user Program Check Routine 



SI XT issued and 
the user routine 
is already in use: 



Complement of user Program Check Routine address 



Bytes 4-7 No STXIT issued: zero 

STXIT issued: Address of the user Save Area 

Note: 

Each generated table always comprises 1 6 entries; the subtask entries occupy the higher address 

locations in the table. 

Bytes 100—101 (X'64'— X'65') of the partition communication region contain the address of the 
PC Option Table. Label PCTAB identifies the first byte of the table. 



OPERATOR COMMUNICATION TABLE 
OCTAB 







3 


4 7 


Flag 
Byte 


Routine Address 


Save Area Address 



Byte X'80' Routine active 

Bytes 1-3 No STXIT issued: zero 

STXIT issued: Address of the user Operator Communication Routine 

STXIT issued and 

the user routine 

is already in use: Complement of the userOperatorCommunication Routine address 

Bytes 4-7 No STXIT issued: zero 

STXIT issued: Address of the user Save Area 

Note: 

There is one entry for each partition supported. 

Bytes 104—105 {X'68'— X'69') of the partition communication region contain the address of the 
OC Table. Label OCTAB identifies the first byte of the table. 



INTERVAL TIMER TABLE 
ITTAB 



Subtask 



Flag 
Byte 



Routine address 



CompLofTECB 



Byte X'80' IT Routine active 

Bytes 1-3 No TECB or STXIT issued: zero 

TECS issued: Address of the timer event control block 

STXIT issued: Address of user interval timer routine 

STXIT issued and user 

routine is already in use: Complement of the user interval timer routine 

Note: 

Bit 1 of the byte is used as a flag bit: 

Bit 1 = If timer interrupt occurred and timer exit routine could not be entered. The process- 
ing of the timer interrupt is delayed until exit IT or Exit AB is issued. 

Bytes 4-7 No TECB or STXIT issued: zero 

TECB issued: Complement of the TECB address 

STXIT issued: Address of the user save area 

Note: 

One table entry is built for each partition. 

The table always comprises 1 5 entries; the subtask entries occupy the higher address locations in 
the table. 

Bytes 102—103 (X'66'— X'67') of the partition communication region contain the address of the 
IT Table. Label ITTAB identifies the first of the table. 



I 



TASK TIMER OPTION TABLE 
3 4 7 8 



Exit 

Routine 

Address 


Save 
Area 
Address 


Task Timer Interval 



Bytes 0-3 No STXIT issued: 
STXIT issued: 
STXIT issued and user's 
routine already in use: 

Bytes 4-7 No STXIT issued: 
STXIT issued: 

Bytes 9-15 No SETT issued: 
SETT issued: 



Address of entry point of user's task timer routine address 

Complement of the task timer routine address 

zero 

Address of the user's save area 

zero or negative 

Time remaining of the interval specified. The time is ex- 
pressed in micro-seconds in bits 4-51 . Bits 52-63 are 
ignored. 



Note: 

Bytes 176-179 (X'B0"-X'B3') of the System Communications Region (SYSCOM) contain the 

address of Task Timer Table. Label TTTAB identifies the first byte of the table. 



INTERVAL TIMER REQUEST TABLE 
ITREQ 



Clock Comparator Value 
{= end of time interval) 



Task 
Identifier 



Interval Timer Request Table (ITTREQ) 

The entries in the ITREQ are either active or inactive. An active entry contains in bytes 0—7 the 
clock comparator value {= end of interval) and in bytes 8-9 the task identifier. The lowest value 
occupies the first position of the table, the highest value the position before the inactive entries. 

All bits of an inactive entry are set to one (binary format). The last entry is always inactive and 
all entries are set inactive after IPL. 

The clock comparator is set to the value contained in the first entry of the ITREQ table. 

Bytes 80-83 (X'50'-X'53") of the System Communication Region (SYSCOM) contain the 
address of the IT Request Table. ITREQ identifies the first byte of the table. 



ABNORMAL TERMINATION TABLE 
ABTAB 



;^3 



Flags 


Routine Address 
1 1 




Save Area Address 



Byte X'80' Routine active 

X'40'Suppress message and DUMP before entering AB routine 

Bytes 1-3 No STXIT issued: zero 

STXIT issued: Address of entry point of user's abnormal termination 

routine 
STXIT issued and the user 
AB routine already in use: Complement of the user AB exit routine address 

The maintask and subtasks may have the same or different AB routines. When a 
subtask is ATTACHed after a STXIT AB macro has been issued by teh maintask, 
the subtaks will receive the AB routine address specified by the maintask only if 
the ATTACH macro for that subtask has the ABSAVE parameter specified. The 
subtask can override this by issuing its own STXIT AB macro. 

Bytes 4-7 No STXIT issued or no 

save area parameter passed: zero 

STXIT issued and save 

area parameter passed: Address of a 72-byte save area used by the supervisor to 

store the interrupt status information and the contents 

of the general requesters. 



One table entry is generated for each partition supported. The table always comprises 1 5 entries; 
the subtask entries occupy the higher address locations in the table. 

Bytes 84-87 (X'54'-X'57') of the System Communication Region (SYSCOM) contain the 
address of the AB Table. Label ABTAB identifies the first byte of the table. 



PAGE FAULT HANDLING OVERLAP TABLE 
PFATAB 





PHO 

Routine Address 


Page Fault Information 



■ Flag Byte 



SETPFA issued 



Bit 
Bit 1 



1 = A page fault from the task is in the Page Queue 

1 = A page fault occuring in a supervisor service of the task is queued in the 

Page Queue Table 
Reserved 



Bits 2- 

Bytes 1—3 Address of the user's page fault appendage routine 

Bytes 4— 7 Page fault information (for detail layout see Page - IN - Queue Table) 

This information is stored here only when a page fault occurs in a supervisor service 
working for the task, while another page fault is queued for the task in the Page 
Queue, otherwise zero. 

NO SETPFA issued 
Bytes 0-7 zero 



One table entry is generated for each partition supported. The table always comprises 15 entries; 
the subtask entries occupy the higher address locations in the table. Label PFATAB identifies the 
first byte of the table. 



JOB ACCOUNTING INTERFACE COMMON TABLE 



Displacement 


Label 


Description | 




(ACCTCOMN) 






0-15 


ACCTSVRG 


Temporary register save area 




16-17 


ACCTSVRX 


Reserved 




18-19 


ACCTSVRE 


Reserved 




20-23 


ACCTPCNT 


Count of partitions using the Job Accounting 


interface 


24 


ACCTSAID 


Reserved 




25 


ACCTFAID 


Reserved 




26 


ACCTRAID 


Accounting ID: 
X'OO- Overhead time 
X'04' Allboundtime 
Byte 1 of PI K for CPU time 




27 


ACCTSWCH 


Accounting switches: 
Bit 1 = Cancel accounting 
Bit 1 1 = No active partitions 
Bit 2 1 = Catalog in process 
Bit 3 1 = Alternate label area 
Bit 4 1 = IPL indicator 
Bit 5 1 = Reserved 
Bit 6 1 = Reserved 
Bit 7 1 = Reserved 




28-31 


ACCTIME 


Reserved 




32-33 


ACCTRESC 


Reserved 




34-35 


ACCTUSEP 


Address of user save area (ACCTUSER) 




36-37 


ACCTUSEL 


Length of user save area (Set with 1st operand of FOPT | 






macro parameter JALIOCS) 




38-39 


ACCTSJOB 


Job accounting partition indication 




40-43 


ACCTBLES 


Address of BG Job Accounting Table 





This table is to be extended (depending on the number of supported partitions) according to the 
pattern shown below. 



NPARTS=n 






44-47 




Address of Fn Accounting Table 


+ 4 




Address of F2 Job Accounting Table 


+ 4 




Address of F1 Job Accounting Table 


+ (n'2)-1 


ACCTSEAS 


Control Field: prevents the accounting routine being 
loaded twice 



* These values are the same as the PI K values for the relevant tasks. 

Byte 124-127 (X'7C'-X'7F') of the system communication region (SYSCOM) contain the 
address of the Job Accounting Interface Common Table. Label ACCTCOMN identifies the first 
byte of the tabel. 



JOB ACCOUNTING INTERFACE PARTITION TABLE 



Displacement 


Label 


Description 




(ACCTABLE) 




0-3 


ACCTWK1 


Work area used by job control 


4-7 


ACCTWK2 


Work area used by job control 


8-11 


ACCTSVPT 


Job card pointer; address of Job card field following job- 
name 


12-13 


ACCTPART 


ID of partition in charge (partitions switch name) 


14-15 


ACCTLEN 


Length of SIC area = 6n+1 , where n = number of devices 
for this partition in SYSGEN option JA = (n, n, . . .) 


16-21 


ACCTLOAD 


Label area instruction; moves JAI label area adressto 
OPEN/CLOSE transients 


22-23 


ACCTRES3 


Reserved 


24-27 


ACCTLADD 


Address of alternate label area 


28-31 


ACCTCPUT 


Counter for program execution time (processor time) in 
the current jobstep. Counted in 300th of a second. 


32-35 


ACCTOVHT 


Counter for system excution time (overhead time) in the 
current job step, distributed in proportion of the processor 
time. 


36-39 


ACCTBNDT 


Counter for all-bound time; system wait state time divided 
between running partitions. 


40-47 


ACCTSVJN 


Save area for job name during simulated EOJ 


48-55 


ACCTJBNM 


Job name; taken from job card 


56-71 


ACCTUSRS 


User information; 16 bytes form job card 


72-73 


ACCTPTID 


Partition ID: 'BG*, "Fr. ^2', etc. in EBCDIC format 


74 


ACCTCNCL 


Cancel code; see Cancel Codes and Messages 


75 


ACCTYPER 


Type of record "S" = job step, "L" = last step of job 


76-83 


ACCTDATE 


Date in format specified at SYSGEN (MM/DDA'Y or 
DD/IVIM/YY) 


84-87 


ACCTSTRT 


Start time of a job-step, in packed decimal 
(DHHMMSSF;F = sign) 


88-91 


ACCTSTOP 


Stop time of a job step in the same format as ACCTSTRT. 
This value is used as the start time for the next step. 


92-95 


ACCTRES 


Reserved 


96-103 


ACCTEXEC 


Phase name; taken from execute card 


104-107 


ACCTHICR 


2K * number of partition pages referenced (or pfixed for 
real execution) by the problem program in the current 
job step. 


108-111 


ACCTIMES 


Same as ACCTCPUT at the end of the job step 


112-115 




Same as ACCTOVHT at the end of job step 


116-119 




Same as ACCTENDT at the end of job step 


120 


ACCTSIOS 


SIO tables: 8 bytes for each device specified by SYSGEN 
options, as follows: 2 bytes for device address (Ocuu), 
4 bytes for count of SIOS in current jobstep. 

Overflow byte: norally X'20", but is X'30' if more def ices 
are used within a partition that specified by SYSGEN 
options. 



Notes: 

DSECT ACCTABLE symbolically addresses the JAI Partition Tables with labels, as shown. Each 
partition in which JAI is supported has its own JAI Partition Table. This table is labeled ACCTBG 
for the active partition BG; ACCTF1 for the active partition F1 ; ACCTF2 for F2, etc. 

The address of this table is in the partition Communication Region at displacement 116 (X'74'). 



ASCII EBCDIC TRANSLATION TABLES 



ASCII/EBCDIC (0/0 to 3/2) 



ASCII 


EBCDIC 




Charact. 


Col 


Row 


Bit Pattern 


Co 


Row 


Bit Pattern 


Comments 












(in 


hex) 








NUL 


o" 





0000 


0000 


~0~ 





0000 


0000 




SOH 





1 


0000 


0001 





1 


0000 


0001 




STX 





2 


0000 


0010 





2 


0000 


0010 




ETX 





3 


0000 


0011 





3 


0000 


0011 




EOT 





4 


0000 


0100 


3 


7 


0011 


0111 




ENQ 





5 


0000 


0101 


2 


D 


0010 


1101 




ACK 





6 


0000 


0110 


2 


E 


0010 


1110 




BEL 





7 


0000 


0111 


2 


F 


0010 


1111 




BS 





8 


0000 


1000 


1 


6 


0001 


0110 




HT 





9 


0000 


1001 





5 


0000 


0101 




LF 





10 


0000 


1010 


2 


5 


0010 


0101 




VT 





11 


0000 


1011 





B 


0000 


1011 




FF 





12 


0000 


1100 





C 


0000 


1100 




CR 





13 


0000 


1101 





D 


0000 


1101 




SO 





14 


0000 


1110 





E 


0000 


1110 




SI 





15 


0000 


1111 





F 


0000 


1111 




OLE 







0001 


0000 


1 





0001 


0000 




DC1 




1 


0001 


0001 


1 


1 


0001 


0001 




DC2 




2 


0001 


0010 


1 


2 


0001 


0010 




DC3 




3 


0001 


0011 


1 


3 


0001 


0011 




DC4 




4 


0001 


0100 


3 


C 


0011 


1100 




NAK 




5 


0001 


0101 


3 


D 


0011 


1101 




SYN 




6 


0001 


0110 


3 


2 


0011 


0010 




ETB 




7 


0001 


0111 


2 


6 


0010 


0110 




CAN 




8 


0001 


1000 


1 


8 


0001 


1000 




EM 




9 


0001 


1001 


1 


9 


0001 


1001 




SUB 




10 


0001 


1010 


3 


F 


0011 


1111 




ESC 




fl 


0001 


1011 


2 


7 


0010 


0111 




FS 




12 


0001 


1100 


1 


C 


0001 


1100 




GS 




13 


0001 


1101 


1 


D 


0001 


1101 




RS 




14 


0001 


1110 


1 


E 


0001 


1110 




US 




15 


0001 


1111 


1 


F 


0001 


1111 




SP 







0010 


0000 


4 





0100 


0000 




1 


2 


1 


0010 


0001 


4 


F 


0100 


1111 


Logical OR 




2 


2 


0010 


0010 


7 


F 


0111 


1111 




# 


2 


3 


0010 


0011 


7 


B 


0111 


1011 




s 


2 


4 


0010 


0100 


5 


B 


0101 


1011 




% 


2 


5 


0010 


0101 


6 


C 


0110 


1100 




& 


2 


6 


0010 


0110 


5 





0101 


0000 






2 


7 


0010 


0111 


7 


D 


0111 


1101 




( 


2 


8 


0010 


1000 


4 


D 


0100 


1101 




) 


2 


9 


0010 


1001 


5 


D 


0101 


1101 




• 


2 


10 


0010 


1010 


5 


C 


0101 


1100 




+ 


2 


11 


0010 


1011 


4 


E 


0100 


1110 






2 


12 


0010 


1100 


6 


B 


0110 


1011 




- 


2 


13 


0010 


1101 


6 





0110 


0000 


Hyphen, Minus 




2 


14 


0010 


1110 


4 


B 


0100 


1011 




/ 


2 


15 


0010 


1111 


6 


1 


0110 


0001 







3 





0011 


0000 


F 





1111 


0000 




1 


3 


1 


0011 


0001 


F 


1 


1111 


0001 




2 


3 


2 


0011 


0010 


F 


2 


1111 


0010 





ASCII EBCDIC TRANSLATION TABLES (. . . Cont'd) 



ASCII/EBCDIC (3/3 to 6/6) 



ASCII 


EBCDIC 




Charact. 


Col 


Row 


Bit Pattern 


Co 


Row 


Bit Pattern 


Comments 












(in 


hex) 








3 


"i" 


3 


0011 


0011 




3 


1111 


0011 




4 


3 


4 


0011 


0100 




4 


1111 


0100 




5 


3 


5 


0011 


0101 




5 


1111 


0101 




6 


3 


6 


0011 


0110 




6 


1111 


0110 




7 


3 


7 


0011 


0111 




7 


1111 


0111 




8 


3 


8 


0011 


1000 




8 


1111 


1000 




g 


3 


9 


0011 


1001 




9 


1111 


1001 






3 


10 


0011 


1010 




A 


0111 


1010 






3 


11 


0011 


1011 




E 


0101 


1110 




< 


3 


12 


0011 


1101 




c 


0100 


1100 




= 


3 


13 


0011 


1101 




E 


0111 


1110 




> 


3 


14 


0011 


1110 


6 


E 


0110 


1110 




? 


3 


15 


0011 


1111 


6 


F 


0110 


1111 




@ 


4 





0100 


0000 


7 


c 


0111 


1100 




A 


4 


1 


0100 


0001 


c 


1 


1100 


0001 




B 


4 


2 


0100 


0010 


c 


2 


1100 


0010 




C 


4 


3 


0100 


0011 


c 


3 


1100 


0011 




D 


4 


4 


0100 


0100 


c 


4 


1100 


0100 




E 


4 


5 


0100 


0101 


c 


5 


1100 


0101 




F 


4 


6 


0100 


0110 


c 


6 


1100 


0110 




G 


4 


7 


0100 


0111 


c 


7 


1100 


0111 




H 


4 


8 


0100 


1000 


c 


8 


1100 


1000 




1 


4 


9 


0100 


1001 


c 


9 


1100 


1001 




J 


4 


10 


0100 


1010 


D 


1 


1101 


0001 




K 


4 


11 


0100 


1011 


D 


2 


1101 


0010 




L 


4 


12 


0100 


1100 


D 


3 


1101 


0011 




M 


4 


12 


0100 


1101 


D 


4 


1101 


0100 




N 


4 


14 


0100 


1110 


D 


5 


1101 


0101 







4 


15 


0100 


1111 


D 


6 


1101 


0110 




P 


5 





0101 


0000 


D 


7 


1101 


0111 




Q 


5 


1 


0101 


0001 


D 


8 


1101 


1000 




R 


5 


2 


0101 


0010 


D 


9 


1101 


1001 




S 


5 


3 


0101 


0011 


E 


2 


1110 


0010 




T 


5 


4 


0101 


0100 


E 


3 


1110 


0011 




U 


5 


5 


0101 


0101 


E 


4 


1110 


0100 




V 


5 


6 


0101 


0110 


E 


5 


1110 


0101 




w 


5 


7 


0101 


0111 


E 


6 


1110 


0110 




X 


5 


8 


0101 


1000 


E 


7 


1110 


0111 




Y 


5 


9 


0101 


1001 


E 


8 


1110 


1000 




z 


5 


10 


0101 


1010 


E 


9 


1110 


1001 




[ 


5 


11 


0101 


1011 


4 


A 


0100 


1010 




\ 


5 


12 


0101 


1100 


E 





1110 


0000 


Reverse Slant 


] 


5 


13 


0101 


in 


5 


A 


0101 


1010 






5 


14 


0101 


1110 


5 


F 


0101 


1111 


Logical Not 


- 


5 


15 


0101 


1111 


6 


D 


0110 


1101 


Underscore 




6 





0110 


0000 


7 


9 


0111 


1001 


Grave accent 


a 


6 


1 


0110 


0001 


8 


1 


1000 


0001 




b 


6 


2 


0110 


0010 


8 


2 


1000 


0010 




c 


6 


3 


0110 


0011 


8 


3 


1000 


0011 




d 


6 


4 


0110 


0100 


8 


4 


1000 


0100 




e 


6 


5 


0110 


0101 


8 


5 


1000 


0101 




f 


6 


6 


0110 


0110 


8 


6 


1000 


0110 





ASCII EBCDIC TRANSLATION TABLES (. . . Cont'd) 



ASCII EBCDIC (6/7 to 7/15) 



ASCII 


EBCDIC 




Charact. 


Co 


Row 


Bit Pattern 


Col 


Row 


Bit Pattern 


Comments 


g 


6 


7 


0110 


0111 


8 


7 


1000 


0111 




h 


6 


8 


0110 


1000 


8 


8 


1000 


1000 




i 


6 


9 


0110 


1001 


8 


g 


1000 


1001 




J 


6 


10 


0110 


1010 


g 


1 


1001 


0001 




k 


6 


11 


0110 


1011 


9 


2 


1001 


0010 




1 


6 


12 


0110 


1100 


9 


3 


1001 


0011 




m 


6 


13 


0110 


1101 


9 


4 


1001 


0100 




n 


6 


14 


0110 


1110 


9 


5 


1001 


0101 




o 


6 


15 


0110 


1111 


g 


6 


1001 


0110 




P 







0111 


0000 


g 


7 


1001 


0111 




q 




1 


0111 


0001 


9 


8 


1001 


1000 




r 




2 


0111 


0010 


9 


9 


1001 


1001 




s 




3 


0111 


0011 


A 


2 


1010 


0010 




t 




4 


0111 


0100 


A 


3 


1010 


0011 




u 




5 


0111 


0101 


A 


4 


1010 


0100 




V 




6 


0111 


0110 


A 


5 


1010 


0101 




w 




7 


0111 


0111 


A 


6 


1010 


0110 




X 




8 


0111 


1000 


A 


7 


1010 


0111 




y 




g 


0111 


1001 


A 


8 


1010 


1000 




z 




10 


0111 


1010 


A 


g 


1010 


1001 




{ 




11 


0111 


1011 


c 





1100 


0000 




1 




12 


0111 


1100 


6 


A 


0110 


1010 


Vertical Line 


> 




13 


0111 


1101 


D 





1101 


0000 




^ 




14 


0111 


1110 


A 


1 


1010 


0001 


Tilde 


DEL 




15 


0111 


1111 





7 


0000 


0111 




EBCDIC 


ASCII 




Charact. 


Col 
(in 


Row 
hex) 


Bit Pattern 


Col 


Row 


Bit Pattern 


Comments 


NUL 








0000 


0000 








0000 


0000 




SOH 





1 


0000 


0001 





1 


0000 


0001 




STX 





2 


0000 


0010 





2 


0000 


0010 




ETX 





3 


0000 


0011 





3 


0000 


0010 




HT 





5 


0000 


0101 





g 


0000 


1001 




DEL 





7 


0000 


0111 





15 


0111 


1111 




VT 





B 


0000 


1011 





11 


0000 


1011 




FF 





C 


0000 


1100 





12 


0000 


1100 




CR 





D 


0000 


1101 





13 


0000 


1101 




SO 





E 


0000 


1110 





14 


0000 


1110 




SI 





F 


0000 


1111 





15 


0000 


1111 




DLE 







0001 


0000 







0001 


0000 




DC1 




1 


0001 


0001 




1 


0001 


0001 




DC2 




2 


0001 


0010 




2 


0001 


0010 




DC3 




3 


0001 


0011 




3 


0001 


0011 




BS 




6 


0001 


0110 




8 


0000 


1000 




CAN 




8 


0001 


1000 




8 


0001 


1000 




EM 




9 


0001 


1001 




g 


0001 


1000 




FS 




C 


0001 


1100 




12 


0001 


1100 




GS 




D 


0001 


1101 




13 


0001 


1101 




RS 




E 


0001 


1110 




14 


0001 


1110 




US 




F 


0001 


1111 




15 


0001 


1111 





EBCDIC to ASCII (X'OO'toMF") 



ASCII EBCDIC TRANSLATION TABLES {. . . Cont'd) 



EBCDIC to ASCII (X'25' to X'93') 












EBCDIC 


ASCII 




Charact. 


Co 


Row 


Bit Pattern 


Col 


Row 


Bit Pattern 


Comments 




(in 


hex) 
















LF 


2 


5 


0010 


0101 





10 


0000 


1010 




ETB 


2 


6 


0010 


0110 


1 


7 


0001 


0111 




ESC 


2 


7 


0010 


0111 


1 


11 


0001 


1011 




ENQ 


2 


D 


0010 


1101 





5 


0000 


0101 




ACK 


2 


E 


0010 


1110 





6 


0000 


0110 




BEL 


2 


F 


0010 


1111 





7 


0000 


0111 




SYN 


3 


2 


0011 


0010 


1 


6 


0001 


0110 




EOT 


3 


7 


0011 


0111 





4 


0000 


0100 




EC4 


3 


C 


0011 


1100 


1 


4 


0001 


0100 




NAK 


3 


D 


0011 


1101 


1 


5 


0001 


0101 




SUB 


3 


F 


0011 


1111 


1 


10 


0001 


1010 




SP 







0100 


0000 


2 





0010 


0000 








A 


0100 


1010 


5 


11 


0101 


1011 








B 


0100 


1011 


2 


14 


0010 


1110 




< 




C 


0100 


1100 


3 


12 


0011 


1100 








D 


0100 


1101 


2 


8 


0010 


1000 








E 


0100 


1110 


2 


11 


0010 


1011 








F 


0100 


1111 


2 


1 


0010 


0001 


Logical OR 


& 


5 





0101 


0000 


2 


6 


0010 


0110 






5 


A 


0101 


1010 


5 


13 


0101 


1101 






5 


B 


0101 


1011 


2 


4 


0010 


0100 






5 


C 


0101 


1100 


2 


10 


0010 


1010 






5 


D 


0101 


1101 


2 


9 


0010 


1001 






5 


E 


0101 


1110 


3 


11 


0011 


1011 




— 


5 


F 


0101 


1111 


5 


14 


0101 


1110 


Logical Not 




6 





0110 


0000 


2 


13 


0010 


1101 


Hyphen, Minus 




6 


1 


0110 


0001 


2 


15 


0010 


1111 






6 


A 


0110 


1010 


7 


12 


0111 


1100 


Vertical Line 




6 


B 


0110 


1011 


2 


12 


0010 


1100 




% 


6 


C 


0110 


1100 


2 


5 


0010 


0101 




— 


6 


D 


0110 


1101 


5 


15 


0101 


1111 


Underscore 


n 


6 


E 


0110 


1110 


3 


14 


0011 


1110 




? 


6 


F 


0110 


1111 


3 


15 


0011 


1111 








9 


0111 


1001 


6 





0110 


0000 


Grave accent 






A 


0111 


1011 


3 


10 


0011 


1010 




# 




B 


0111 


1011 


2 


3 


0010 


0011 




@ 




C 


0111 


1100 


4 





0100 


0000 








D 


0111 


1101 


2 


7 


0010 


0111 




= 




E 


0111 


1110 


3 


13 


0011 


1101 








F 


0111 


1111 


2 


2 


0010 


0010 




a 


8 


1 


1000 


0001 


6 


1 


0110 


0001 




b 


8 


2 


1000 


0010 


6 


2 


0110 


0010 




c 


8 


3 


1000 


0011 


6 


3 


0110 


0011 




d 


8 


4 


1000 


0100 


6 


4 


0110 


0100 




e 


8 


5 


1000 


0101 


6 


5 


0110 


0101 




f 


8 


6 


1000 


0110 


6 


6 


0110 


0110 




g 


8 


7 


1000 


0111 


6 


7 


0110 


0111 




h 


8 


8 


1000 


1000 


6 


8 


0110 


1000 




i 


8 


9 


1000 


1001 


6 


9 


0110 


1001 




J 


9 


1 


1001 


0001 


6 


10 


0110 


1010 




k 


9 


2 


1001 


0010 


6 


11 


0110 


1011 




1 


9 


3 


1001 


0011 


6 


12 


0110 


1100 





ASCII EBCDIC TRANSLATION TABLES (. . . Cont'd) 



EBCDIC to ASCII (X'94'tX'F9') 












EBCDIC 


ASCII 




Charact. 


Roi Row 


Bit Pattern 


Col 


Row 


Bit Pattern 


Comments 




(in hex) 














m 


9 4 


1001 


Olio 


6 


13 


0110 


1101 




n 


9 5 


1001 


0101 


6 


14 


0110 


1110 







9 6 


1001 


Olio 


6 


15 


0110 


1111 




P 


9 7 


1001 


0111 


7 





0111 


0000 




q 


9 8 


1001 


1000 


7 


1 


0111 


0001 






9 9 


1001 


1001 


7 


2 


0111 


0010 




'V 


A 1 


1010 


0001 


7 


14 


0111 


1110 


Tilde 


s 


A 2 


1010 


0010 


7 


3 


0111 


0011 




t 


A 3 


1010 


0011 


7 


4 


0111 


0100 




u 


A 4 


1010 


0100 


7 


5 


0111 


0101 




V 


A 5 


1010 


0101 


7 


6 


0111 


0110 




w 


A 6 


1010 


0110 


7 


7 


0111 


0111 




X 


A 7 


1010 


0111 


7 


8 


0111 


1000 




y 


A 8 


1010 


1000 


7 


9 


0111 


1001 




z 


A 9 


1010 


1001 


7 


10 


0111 


1010 




{ 


C 


1100 


0000 


7 


11 


0111 


1011 




A 


C 1 


1100 


0001 


4 


1 


0100 


0001 




B 


C 2 


1100 


0010 


4 


2 


0100 


0010 




C 


C 3 


1100 


0011 


4 


3 


0100 


0011 




D 


C 4 


1100 


0100 


4 


4 


0100 


0100 




E 


C 5 


1100 


0101 


4 


5 


0100 


0101 




F 


C 6 


1100 


Olio 


4 


6 


0100 


0110 




G 


C 7 


110 


0111 


4 


7 


0100 


0111 




H 


C 8 


1100 


1000 


4 


8 


0100 


1000 




1 


C 9 


1100 


1001 


4 


9 


0100 


1001 




> 


D 


1101 


0000 


7 


13 


0111 


1101 




J 


D 1 


1101 


0001 


4 


10 


0100 


1010 




K 


D 2 


1101 


0010 


4 


11 


0100 


1011 




L 


D 3 


1101 


0011 


4 


12 


0100 


1100 




M 


D 4 


1101 


0100 


4 


13 


0100 


1101 




N 


D 5 


1101 


0101 


4 


14 


0100 


1110 







D 6 


1101 


0110 


4 


15 


0100 


1111 




P 


D 7 


1101 


0111 


5 





0101 


0000 




Q 


D 8 


1101 


1000 


5 


1 


0101 


0001 




R 


D 9 


1101 


1001 


5 


2 


0101 


0010 




\ 


E 


1110 


0000 


5 


12 


0101 


1100 


Reverse Slant 


s 


E 2 


1110 


0010 


5 


3 


0101 


0011 




T 


E 3 


1110 


0011 


5 


4 


0101 


0100 




U 


E 4 


1110 


0100 


5 


5 


0101 


0101 




V 


E 5 


1110 


0101 


5 


6 


0101 


0110 




w 


E 6 


1110 


0110 


5 


7 


0101 


0111 




X 


E 7 


1110 


0111 


5 


8 


0101 


1000 




Y 


E 8 


1110 


1000 


5 


9 


0101 


1001 




z 


E 9 


1110 


1001 


5 


10 


0101 


1010 







F 


1111 


0000 


3 





0011 


0000 




1 


F 1 


1111 


0001 


3 


1 


0011 


0001 




2 


F 2 


1111 


0010 


3 


2 


0011 


0010 




3 


F 3 


1111 


0011 


3 


3 


0011 


0011 




4 


F 4 


1111 


0100 


3 


4 


0011 


0100 




5 


F 5 


1111 


0101 


3 


5 


0011 


0101 




6 


F 6 


1111 


0110 


3 


6 


0011 


0110 




7 


F 7 


1111 


0111 


3 


7 


0011 


0111 




8 


F 8 


1111 


1000 


3 


8 


0011 


1000 




9 


F 9 


1111 


1001 


3 


9 


0011 


1001 





I 



SEGMENT AND PAGE TABLE 



STAB (Segment table) 



Address of 
Page Table 



Address of 
Page Table 



Address of 
Page Table 



Address of 
Page Table 



Each entry in the segment 
table correspondens to one 
64K segment of virtual 
storage. 



One page table is built for 
each segement of virtual 
storage and contains 32 
two-byte entries. 



PT (Page Table) 






BytesOandl 

Bit 1 = Address of any byte in the corresponding page is invalid 

Bits 0—12 Leftmost 13 bits of address of page in real storage if bit 13 = 

Bits 8-1 1 Storage key of corresponding partition if bit 13 = 1 

Bit 13 = Page is in real storage 

1 = Page is not in real storage 

Bit 14 Always zero 

Bit 15 PDS (Page Data Set) bit: 

1 = Page must be read from page data set 

(a valid copy of the page is on the page data set) 
= Page need not be read from page data set 

(no valid copy of the page on the page data set) 

Bytes 208-211 (X'D0'-X'D3') of the System Communication Region (SYSCOM) contain the 
address of the Segment Table. 



PAGE DATA SET TABLE 

Page management uses the Page Data Set Table (DPDTAB) to calculate the correct address for a 
given page on the Page Data Set, if a read or write operation is necessary. Bytes 224—227 
{X'E0'-X*E3') of the System Communication Region (SYSCOM) contain the adress of the 
DPDTAB. The DPDTAB consits of a header and one entry for the device description. Label 
DPDTAB identifies the first byte of the table. The table has the following layout: 

Header 

Bytes: 
0-1 

2-3 

4-5 
6-7 
8-11 
12-13 

14-15 



Reserved, must be 1 

Reserved, must be 1 

Number of virtual pages supported 

Length of DPDTAB entry 

Address of constant table for load leveler 



If /370 mode: 
If ECPS:VSE 

lf/370mode: 
If ECPS:VSE 



Relocation value for Supervisor pages 
Mode: Reserved 

Relocation value for Non-Supervisor pages 
Mode: Reserved 



Entry 

Bytes: 
0-1 

2 

3 

4-5 

6-7 

8-11 

12-15 

16-17 
18-23 
24-25 
26-27 



Channel and unit number of Page Data Set device 

Indicates FBA (1 ), CKD (2), or RPS (3) device 

Device type code 

f FBA device: Block length 

f CKD device: Number of records per track 

If FBA device: Number of blocks per page 
If CKD device: Number of tracks per cylinder 

f FBA device: Block number of lower limit 

f CKD device: Relative track number of lower extent limit 

f FBA device: Number of blocks used for the extent 
f CKD device: Number of tracks used for the extent 

PUB index 

Volume ID of Page Data Set 

Page number of upper limit on the extent 

Not used (for alignment only) 



PAGE IN QUEUE ENTRY (PGQUI) 



Flag Byte 


Page Address 


Task ID 



Bytes: 

Bits 0-3 Bits 0-3 of PI K or TIK 

Bits 4—7 B'OOOO" Page Translation Exception 
B'lOOO" Dummy request 

1—2 Leftmost 16 bits of the address of the page (which is also the address of the page 

frame, if GETREAL) to be handled. The remaining 8 bits of the address are assumed 
to be zero. 

3 Task identifier (PIKorTIK) of user task or task identifier (select byte in STID field) 

or system task 

The request that require the activity of the page-out (PGT) system task (it may be requested by 
GETREAL and for the handling of a PGQUI entry) are queued in the page-out queue (PGQUO), 
and handeld on a FIFO (first-in-first -out) basis. 

The page-in queue has a maximum of 19 four-byte entries and label PGQUI identifies the first 
byte of the table. 



PAGE-OUT QUEUE ENTRY (PGQUO) 



Flag Byte 


Address of PFTE 


1 

Task ID 


Task ID 



Page-out Queue (PGQUO) Entry 



Bytes: 

Flag Byte 

BitO =1 Posting required 

Bits 1-7 Reserved 

1-3 Address of PFTE to be handled 

4,5 Task identifier of system task that requested the entry (only valid if bit in byte 

is on). 

6, 7 Task identifier of user taks that requested the entry (only valid if bit in byte is on). 

The page-out queue consits of 9 eight-byte entries, and the label PGQUO identifies the first byte 
of the table. 



PAGE FRAME TABLE ENTRY (PFTE) 
13 4 5 



PFTB 
Flag 


Page 

Number 

(PNR) 


370 

Mode 
Flag 


Waiting 
Task ID 
(WID) 


PFIX 
Counter 


TFIX 
Counter 


Forward 
Pointer 


Backward 
Pointer 



Page Frame Table Entry (PFTE) 

Byte — 3: Page frame address. 

370 mode only: 



Byte 3: 



Bit 4 = if page frame belongs to supervisor or IPL partition. 
Bit 4 = 1 If page frame belongs to initial page pool. 



Bytes 4 -7: zero 

Byte (PFTE flag): 

BitO 
(Hold Bit) 

Biti 

(FOE bit) 
Bit 2 
(PO bit) 
Bit 3 
(POA bit) 

Bit 4 
(RPbit) 

Bit 5 
(RPUTbit) 



1 = Ensures that each task causing a page fault can use the 
page before it is disconected again. 

1 = Indicates that the PFTE has an entry in PGQUO. 

1 = indicates that an active entry from the PMR task is in PGQUO. 

1 = Indicates that I/O for a page out has been started for this 

PFTE. I 

1 = Indicates for the PGT task that the posting of a system task 
is required. I 

1 = Indicates for the PGT task that the posting of a user task 
is required. 
Bits 6-7 Reserved. 

ff the page belongs to the page frame, byte 1 and 2 contains the leftmost 16 bits 
of the 3-byte address. 



Byte 3 (370 mode flag byte): 
BitO 
(NFRPbit) 

Biti 
(NFVPbit) 

Bit 2 
(DRAPbit) 

Bit 3 
(PC bit) 



Bit 4 
(PNRINVbit) 



1 = Page in this page frame must not be TFIXed, since the page 
frame is in the PSQ. 

1 = Page belonging to this page frame is requested by PFIX. 
The page frame is not in the PSQ. 

1 = Indicates that the address space belonging to the PFTE is 
failing storage. 

1 = Indicates that a page is connected to the page frame. Either 
a page-in or an unconditional page-out request is in progress. 

1 = Page frame is unused. It indicates that the PNR field, the FIX 
counters, the WID field, the PFTE flag and the 370 mode flag 
(except forthe NFRP, DRAP and RPRESPF bits) are invalid. 



Bit 5 

(RPRESPF bit) 1 = Indicates to the PMR or PGT system that the posting of a 
task (for PFIX/GETREAL) that is waiting for the end of a 
page I/O for a reserved page frame is requeseted. NFRP is 
also set. 

Bit 6 

(RPPGFIX bit) 1 = Indicates for the PGT task that the posting of a task (for 
PFIX/TFIX), that is waiting for the end of a page-out for 
the page to be PFIXed, is requested. NFVP is also set. 

Byte 4 (370 mode only): 

Contains the TIK of the task requesting PFIX. The page frame of the page to be 
PFIXed does not belong to the corresponding real partition. 

Byte 5: Indicates how often the page is permanently fixed. 

Byte 6 and 7: indicates how often the page is temporarily fixed. 

Byte 8 -11: Pointer to the next PFTE. 

Byte 12-15: Pointer to the preceding PFTE. 

Note: 

The pointers in bytes 7 through 15 are only valid if the PFTE is in the PSQ, or, for 370 mode, in 

the unused page frame queue. 

IV-77 





e ^ 


ENTRY 1 




ENTRY 2 


no 


s -^ 




ENTRY n-1 




EN fRY n 



1 3 4 5 7 



ByteO 


TIK (identifier of taks that issued the PAGEIN macro). 


Bytes 1-3 


Pointer to a list of areas that are to be paged in. 


Byte 4 


bitO 


1 = PAGEIN request has been completed 




biti 


Reserved 




bit 2 


1 = One more of the requested pages are outside the requesting 
program's partition. 




bit 3 


1 = One or more negative length specifications were detected. 




bit 4 


Reserved 




bit 5 


Paging activity too high. Terminator required by load leveler. 




bite 


Taks is terminating, request has to be deleted. 




bit 7 


Second scan in progress. 


Byte 5-7 


Pointer to ECB (if used) or zero. 1 



The number of entries is determined at supervisor generation time. Label PAGETAB identifies 
the first byte of the table. 



TRANSLATION CONTROL BLOCK (TCB) 
12 34 



Flag 
byte 


used 

by 

BTAM 


TIK/PIK 


Pointer to 
Status Modifier 
List 


Pointer to 
Control 
Command List 


Pointer to 
TIC Line 


Pointer to 
Copy Block 
End 



Address of 
copied CCB 
(for cancel) 


Number of 
free IDA words 
in 1 DAL blocks 


Work areas 


Address of 
lastTFIX 
request 


Pointer to 

DIDAL 

chain 


Address of 

current 

DIDAL 


Fast 

Translation 
Flag Byte 



Reserved 


Number of 
free DIDAL 
entries 


Address of 
current 
DIDAL entry 


Virtual 
CCW address 


Save Area 
(Registers 2-F) 


Pointer to 
next used 
TCB 



ByteO (TCBFLAG): 

= 1 : Data chaining specified 

= 1 : Read/Sense command specified 

= 1 : Read backward command specified 

= 1 : Status modifier command with data chaining 

= 1 : Status modifier command with command chaining 

= 1 : Request for FIX information block 

6,7: Reserved 

Bytel (ADBTAMCB): 

Number of copy blocks needed in addition to those required for current CCW- 
transiation request (refer to the section "BTAM Considerations"). 

Byte 4 (DEVSTPTR): 

Pointer to status modifier list belonging to handled device. Zero if device does not 
support status modifier commands. 

Byte 8 (DEVCDPTR): 

Pointer to control command list which belongs to handled device. Zero if device does 
not support control commands with data area. 

Byte 12 (LINEPTR): 

Chain of knots of free structure caused by TIC following status modifier command. 
(Refer to the section "Translating Status Modifier Commands".) Zero if no knots 
exist in the CCW chain. 

Byte 16 (BENDPTR): 

Chain of knots built because status modifier command is last one fitting in CCW copy 
block. Zero if no status modifier commands at end of CCW copy blocks. 

Byte 60 (TCBFLAG1): 

Bit =1 Replica creation requested 
Bit 1 =1 Replica test in process 
Bit 2 =1 Request for replica block 
Bit 3 =1 Request for DIDAL block 
Bit 4—7 Reserved 

Bytes 52—71 as shown are for fast CCW translation only. For a normal translation 
byte 52 is the first byte of the save area. 

To locate the TCB associated with the partition/task, add X'50' to the address of the System 
Save Area (displacement X'09' of the appropriate PIB). Labels CCWTCBI-CCWTOBn identify 
the first byte of the appropriate TCB. 



TRANSLATION CONTROL AND COPY BLOCKS 

The following control and copy blocks are used to copy and translate a COB and channel program 
for a virtual mode I/O request: 

• A translation control block (CCWTCB, or abbreviated asTCB).This block is used as a work 
and save area during translation. 

• A CCB copy block. The user CCB and sense CCW (if any) are copied into this block. The COB 
copy block also contains information about the copied and translated channel program. 

• CCW copy blocks. Each block contains copy locations for up to 7 contiguous CCWs and queue- 
ing information. 

• I DAL blocks. Blocks used for building Indirect Data Address Lists for CCWs having IDALs or 
for data areas which cross page boundaries. 

• Fix information blocks. Each block contains a bit string for fix information for a block of 
1088K of real storage. One or more fix informations blocks are generated if a page is fixed 

at a location greater than 384K (information for page frames up to that address is kept in the 
CCB copy block). 




COPY BLOCKS (. . . Cont'd) 



Layout of COB Copy Block 



1 , 


2 


3 


4 


5 


6 


7 




CCBCNT 


CCB 
C0M1 


CCB 

COM2 


CCB 
STA1 


CCB 
STA2 


CCB 
CLS* 


CCB 
LNO 


o 

o 

T3 


CCBCCW 

Address of first CCW 


CCBBY3 


CCBCSWW 


o 
o 

CD 

1 


CCBSENS 
Sense CCW if any 




CCBPIK 
UserPIK 


CCB 
FLAG ** 


Unused 


CCBVA 

Virtual Address of CCB 




CCBACB 

Address of first CCW copy block in 

channel program with lowest VBA 


CCBICB 

Address of first IDAL block in channel 

program 




CCBXINF (Fix information; 24 bytes) 

Each bit in this field represents one page frame. 
If a bit is on, the associated page frame contains 
a page fixed for this I/O request. If more than 

384K of real storage are available, the address 

in CCBXPTR will point to any additional field 

which contains bits for the page frames beyound 384K. 






CCBXPTR 

Address of additional Fix information 


CCBNEXT 

Address of next CCB copy block 





Note: 

If the fast CCW translation option is active, bytes 56-67 of the CCB copy block have a different 

meaning, as shown below: 

Bytes 56—59 The address of the REPLICA block associated with this channel program. 

Bytes 60-63 Pointer to the next CCB in the saved CCB queue used by the fast CCW 
translation routines. 

Bytes 64-67 Pointer to the previous CCB in the saved CCB queue. 

• Set to X:20' (= copied CCB) 
** Legend CCBFLAG: 

Bit Indicates that CCW-translation of this request is complete; indicator is set 

before I/O request is enqueued in channel queue. 

Bit 1 Indicates that at least one time during CCW-translation control has been 

transferred to TFIX routine. In case TTFIX is scan through CCBXINF 
for freeing pages is skipped. Indicator is set immediately before control 
is transferred to TFIX routine. 

Bit 2 Reserved 

Bit 3 Indicates that the next CCW-translation request from BTAM is from the 

BTAM channel appendage. This indicator is set immediately after 1st time 
request from BTAM has been completed. 

Bit 4 Valid for fast translation. 

Bit 5 CCB copy block is on saved CCB queue. 

Bit 6 Data area pages require fixing. 

Bit 7 Reserved 



COPY BLOCKS (. . . Cont'd) 
Layout of CCW Copy Block 





1 1 1 2 1 3 


4 1 5 1 6 1 7 ! 





1st Copy location for CCW 


8 


2nd Copy location for CCW 


16 


3rd Copy location for CCW 


24 


4th Copy location for CCW 


32 


5th Copy location for CCW 


40 


6th Copy location for CCW 


48 


7th Copy location for CCW 


56 


X'80" * 


X'OOOOOO" 


Virtual address of first CCW in the 
Copy block 


64 


X-88- •* 


X-000000" 


Address of next CCW Copy block in 
the chain 



' X'80' indicates the end of the CCW copy locations in the block. It is replaced by a TIC 
(Transfer in Channel command) if the 7th copy location contains a copied CCW with 
data- or command chaining. Bytes 57—59 will then point to the copy location of the 
CCW following in the CCW in the 7th location. Bytes 56-59 will not be changed if the 
CCW in the 7th copy location is a TIC. 

* X'88', indicates the last 843yte entry in the block. It is replaced by a TIC if the CCW in 
the 7th copy location is a status modifier CCW. Bytes 65—67 will then point to the copy 
location of the second CCW following the status modifier CCW. 



COPY BLOCKS {. . . . Cont'd) 
MAIN REPLICA BLOCK 



VCCBA 


RCCBA 


TIMEST 


REPPIkI REPLCNT 1 CCWSTRL 


REPDIDAL 


3 


CC 


CCW1 


CCW1 


CCW2 


CCW2 


CCW3 


CCW3 


REPFPT 


REPBPT 


REPNEXT 



ADDITIONAL REPLICA BLOCK 



Legend: 

VCCBA Virtual CCB address 

RCCBA Address of copied CCB 

TIMEST Timestamp 

REPPIK Partition Identifikation Key 

REPLCNT The number of tasks currently testing this REPLICA for a match with their 

channel program 

CCWSTRL Length of CCW string (number of CCWs) 

REPDIDAL Address of D I DAL block 

REPFPT, REPBPT Pointers used for chaining REPLlCAs (forward and backward pointer) 

REPNEXT Pointer to (next) additional REPLICA block 



DIDAL BLOCK 




ENTRY 1 


2 


3 


4 


5 


6 


7 


8 


RESERVED 


ICHAIN POINTER •*• 



DIDAL ENTRY 



VIRTUAL ADDRESS 


FLAG 
BYTE* 


POINTER TO 
REALLOC,** 



FLAGBYTE 

BitO Indicatesthat TFIXing isnot 

neccessary because the page 

has already been TFIXed for 

this request. 

Reserved 



1-6 
Bit 7 



Indicates that TFIX request for 
this entry has been completed. 



Real location (either copied CCW or IDA word) 
that should contain the translated I/O area 
address. 

* Points to (next) additional DIDAL. Contains 
4X'00' in last DIDAL. 



CONVERTING VIRTUAL TO REAL ADDRESS 
, EC PSW 





'q 


Instruction Address 




! 


9 B|6 0| 




^ 


40 


/ 


/ "S 


@ 


Segment no. 


Page no. 


Byte Displacement 


1001 1011 


0110 


000 0000 0000 



^^^ 9 

7 ^^'' 



BX/ C / X^ 
12/ 



|lO 0110 1 1,1 "I )01 lOOJO 



1 



^0 



STOR dl 

Control Register 1 | — 

I 0B006F40 I 



SEGMENT TABLE 



Segement (X'OO' 
EOOOCOOO 



Segment 1 (X'OV) 



Segment 2 (X'02') 



Segment 153 (X"99') 



Segment 154 (X'9A') 



Segment 155 |X'9B') 
E000E680 





PAGE TABLE 


X'COOO- 


5= ? 


X'E680' 


Page (X'OO') 




Pagel (X'OT) 


= 


s -:. 




Page 11 (X'OB') 
0469 


X'E698' 


Page 12 (X'OO 
0329 


[8j 


Page13{X'0D') 
0579 


? 


5: s 




Page 30 {X' IE') 




Page 31 (X'lF') 







32 PAGE 
entries 
'for one (1) 
64K Segment 



@ 







X'71AC' (X'6F40'+X'26C') 



H 



I Page Table Entry 

[OOOO 00 11 OOIOIJOOI { ^— i— — 
vj 12^ ,_—- ^ 



00000011 OOIOIJOOO 0000 0000 1 


12 13 
] REAL ADDRESS 


23j 


X '0 3 2 8 C 


S^ 







Note: 

Values used in the figure are hypothetical. 



PAGE DATA SET FORMAT 

Virtual Disk Format 3330 



















2048 bytes 


2048 bytes 


2048 bytes 


2048 bytes 


2048 bytes 




f^^ 


Head 
00 

01 
02 

18 


X'OOOO- 


X'OBOO- 


X'1000' 


X'1800" 


X'2000" 


X'2800' 


il 


X'3000' 












8 5 


X"6000' 












1=^ 


J 




6 X X-800' = X'3000' bytes 
(1 track) 








X'36000' 










X'38FFF' 



Virtual Disk Format 3340 













2048 bytes 


2048 bytes 


2048 bytes 


□-_ Head 
■^ o 00 


X'OOOO' 


X'0800' 


X'1000' 


o 

linder 
;s = X 


X'1800' 






M^ 02 
o fo 


X'3000' 






f2 « 


; 


3 xX'800' = X'1800' bytes 
(1 track) 


5 


"1 


>V 10800- 




X'llFFF' 



Virtual Disk Format 2314 














2048 bytes 


2048 bytes 


2048 bytes 


Head 
00 


X'OOOO' 


X'0800' 


X'1000' 


01 


X'1800' 






02 


X'3000' 






^ 


; 


3 xX'800' = X'1800' bytes 
(1 track) 




19 


X'ICSOO' 




X'IDFFF' 



-1 cylinder: 20 x X'1800' bytes = X'lEOOO' bytes 
Virtual Disk Format 3350 

















w 


-> 


2048 


*- 






Head 
00 


X'OOOO' 


X'0800' 


X'1000' 


X'1800' 


X'2000' 


X'2800' 


X'3000' 


X'3800' 


01 


X'4000' 
















02 


X'8000' 
















5 


J 




8 
(1 


< X'800' = 
track) 


X'4000' by 


tes 






29 


X'74000' 














X'77FFF' 



Virtual Disk Format 3310 and 3370 (FBA Mode) 

In Fixed Block Mode the 3310 and 3370 DASD will provide logical block number in ascending 
sequence. That means 4 blocks with 512 bytes are required to store one page on the PAGE DATA SET. 



LAYOUT OF REPLICA HEADER BLOCKS 



X'OO' 


Flag Byte * 


Number of Tests 
on Replica 


PIKof 
Requestor 


X'04' 


Forward pointer in partiton's replica queue 


X'08' 


Backward pointer in partition's replica queue 


X'OC 


Address of virtual CCB/IORB 


X'lO- 


Saved CCB/IORB 


X'20' 


Pointer to RHB2 



RHB2 




X'OO" 


Pointer to RHB1 


X'04' 


Pointer to associated FHB (fixlist) 


X'08" 


Time stamp 


X'OC 


Length of saved channel program 


X'10" 


Reserved 


X'14' 


Reserved 


X'18" 


Saved user SENSE 


X"20' 


Pointer to next replica block 



D 



REPLICA BLCOK 




x-oo- 


CCW1 


X'08' 


CCW2 


X'10" 


CCW3 


X"18' 


CCW4 


X'20' 


Pointer to next 
block or zero 



• Flag Byte: 

BitO =1 Freeing of replica request 
Bit 1—7 Reserved 



RESOURCE USAGE RECORD TABLE (RURTAB) 

RURTAB 



SYSPL RUR for Proc. Library 




SYSOPEN RUR for VSAM Open 
routine 




SYSLBL RUR for Label Cylinder 




SYSRES RUR for IJSYSRS File 




SYSIXL RUR for VSAM Index 
Build 


Format of 
any RUR 


S YSSPM R U R f or VSAM Space 
Manager 




Ownership bits 









1 


2 


3 




SYSMCO RUR for VSAM Master 
Catalog Routine 








1 Ownership b 

for Job Com 


its 
rol 

gs 


SYSCTLG RUR for VSAM Master 
Catalog 








SYSVTGC RUR for all VTOCs 




Dummy RUR indicating 
■pool exhausted' 


8 bytes 


\ 


/ 


RUR for a Named Resource 

(PoolforRURsof' 



- 1 


Unique Name of a Named Resource 
^Jamed Resources) 



RESOURCE USAGE RECORD TABLE (RURTAB) (. . . Cont'd) 



ByteO 
Bit 3 
Bits 
Bite 
Bit? 

Byte 1 
BitO 
Bit1 
Bit 2 
Bit 3 
Bit 4 
Bits 
Bite 

Byte 2: 
BitO 
Biti 
Bit 2 
Bit 3 
Bit 4 
Bits 
Bite 
Bit? 

Byte 3: 
BitO 
Biti 
Bit 2 
Bit 3 
Bit 4 
Bits 
Bite 
Bit? 

Note: 

For explanation of TIK and PIK see Task Interrupt Key and Partition Identifikation Key. Label 

RURTAB identifies the first byte of the table. 



= Another task waiting for this resource 
= Resource shared among owners indicated 
= Resource used exclusive by indicated task 
= Shared or exclusive use of resource 

Used by Job Control to indicate that the resource is to be held for the duration of a job. 
= TIK or PIK is X70' 
= TIKorPIKisX-eO" 
= TIKorPIKisX'SO- 
= TIKorPIKisX"40' 
= TIKorPIKisX'30, 
= TIKorPIKisX'20' 
= TIKorPIKisX-IO- 



= TIKisX'FO" 
= TIKisX'EO- 
= TIKisX'DO' 
= TIKisX'CO' 
= TIKisX'BO 
= TIKisX'AO' 
= TIKisX'90' 
= TIKisX'80* 

= TIKorPIKisX'?0' 

= TIKorPIKisX-eO- 

= TIKorPIKisX'SO- 

= TIKorPIKisX'40' 

= TIKorPIKisX'30' 

= TIKorPiKisX'20' 

= TIKorPIKisX'IO'(BG) 

= TIK or PIK is X'OO' (Attention) 



of Anchor 
Table 



X'400' 
X'404' 
X'408' 
X'400' 
X'410' 
X'414' 
X"418" 
X'410' 
X'420' 



Used for VSAM 
AMCBS pointer 



Used for VSAM 



2nd Entry 



49th Entry 



50th Entry 



Begin of GETVIS area 



Endof GETViSarea 



^ Address of highest fixed page 



Begin of VISTAB 



EndofVISTAB 



Start serach of bitstring 



New start search address 



Save work REG 1 



No. of bits in ABYTE 



\ 



Format of 
any entry 


7 

Phase 
name 


8 11 

Load 
point 


12 15 

Entry 
point 


16 19 

Length 
of phase 



Byte 16 Status Switch 

X'OO" Phase must be loaded 

X'7F' Phase is already in storage 



Note: 

The Anchor Table is located at the beginning of the GETVIS area in the virtual partition. 



FETCH/LOAD CONTROL BLOCKS 

FOB ( LABEL -DFCB') 

List of internal entry points 



List of external entry points 



State indicators (DFCBSW1-DFCBSW4) 



Start address of FETCH table (FTTAB) 



Pointer to FETCH work area (FCHWORK) 



Pointer to input control block (FICB) 



Save area RG5-RG15 



TFIX/TFREE interface tables 



CHAIN table describing the searching sequence for the various directories 



FRPL area describing the interface to the Fetch I/O processing 



[ 



X'OO- 


Condense counter 


X'or 


PTRtoSLD 


X"04' 


Device Characteristics 


X-OB- 


Start of Directory 


X'OC- 


Channel Address 


X'OE" 


Reserved 


X'OF- 


X'Or FBA 
X'02' CKD 
X'03' RPSDEV. 


X'10' 


Start of LINK directory 



X'OO" 


End of RLD buffer 


X'04' 


PTRto IDRA 


X'OB- 


PTRtoEndof IDRA 


X'OC 


Start of TXT CCW buffer 


X'10* 


End of TXT CCW buffer 


X"14' 


Start add. TXT CCW buffer 


X'18' 


WORKAREA 


X'20' 


WORKAREA 


X'28" 


Search name for directory read 


X'30' 


CCB/IORB 



X'OO" 


LOAD POINT 






X'lC 


PTRto CHAIN TABLE 


X"20' 


PTR to DIRECTORY ENTRY 


X'24' 


PTR to Phasename 


X'29" 


PTR to LOCAL LIST 


X'2C* 


PTR to Relocation Factor 


X-30" 


PTR to RLD 


X'50' 


Phasename 

Relative Start Address 

Length of TXT 



X'OO- 


Number of chain entries — 1 


X'Or 


Indicators: 

X'OO' SDL search 

X'10' Directory search 

X'OC LINK directory search 


X"02' 


LUB identification 
X'0006' SCIL 
X'OBOB' PCIL 


X"04' 


PTR to FTTAB 



X'OO' 


Range of directory 

1 = CKDdevd track) 

nM = FBA 

(n = number of 2K blocks) 


X'04' 


Number of SLD entries 


X'06' 


Highest phasename 



LAYOUT OF SHARED VIRTUAL AREA (SVA) 





0, 


,3 


4 7 







VLT 




8 


VDSA 


VLSA 




10 


VLNA 


VLEA 




18 




TB 




20 










S 


VD 5= 


= 






i AL 






S VL ? 


^ 


. 


r Gv ? 


- 



Field 


Length 


Content 


VLT 


8 


Date + time SVA has been up- 
dated (note 1 ) 


VDSA 


4 


Start address of the System D 
Directory List 


VLSA 


4 


Start address of the virtual 
library (note 2) 


VLNA 


4 


Address of next available 
location in SVA 


VLEA 


4 


Address of end of the SVA 


TB 


10 


Communications area for Job 
Control and SMAINDIR 


VD 


up to 32 K 


System Directory List (note 3) 


AL 


<8 


Alignment bytes for doubleword 
boundary 


VL 


any 


Virtual library containing re- 
entrant and relocatable phases 


GV 


any 


GETVIS area for the system 
(starts on page boundary) 



Note 1: 

As one of the tests to determine whether a warm start copy of the SVA is available, job control 

compares this entry after IPL against the date and time in the SCI L descriptor entry. 

Note 2: 

Address of first doubleward aligned byte after SDL. 

Note 3: 

The layout of this area is compatible with a directory block in the Core Image Library. The SDL 

has fixed length entries of 34 bytes. The last entry contains BX'FF' as phasename. 



LAYOUT OF DIRECTORY ENTRY 






1 


8 10 11 


1213 


1415 


16 


17 


18 20 


21 23 


2426 


27 


29 30 


31 


33 


Phase name 


TTR N 


TT 


LL 


1 


T 


PPP 


EEE 


RR 


R 


AAA 


C 


VEE 


LBLN 



Bytes 0-7 


Phase name 


1 


Bytes 8-10 


TTR 


Relative track address and record number of phase (note 2) 


Byte 1 1 


N 


Number of halfwords containing user data 


Bytes 8-11 


LBLN 


Logica 


1 block number of phase on FBA device 


Bytes 12-13 


TT 


Number of text blocks 


Bytes 14-15 


LL 


Number of text bytes in last next block 


Byte 16 


1 


Switch indicating type of phase 






X'80' 


selfrelocating phase 






X'40" 


relocatable phase 






X'20' 


SVA eligible 






X'10' 


phase is in the SVA (note 1 ) 






X'08' 


phase found in a PICL (note 1 ) 






XW 


phase not found (note 1) 






X"02' 


active entry (filled in) 






X"01" 


not used 


Byte 17 


T 


Always X'OO" (used as type byte for stow table) 


Bytes 18-20 


PPP 


Load point of LNKEDT time (note 3) 


Bytes 21-23 


EEE 


Entry point at LNKEDT time (note 3) 


Bytes 24-25 


RR 


Number of RLD items (note 4) 


Byte 26 


R 


Number of additional RLD blocks (note 4) 


Bytes 27-29 


AAA 


Partition start address of LNKEDT time (note 4) 


Byte 30 


C 


Condense counter at the time when entry was activated (note 6) 


Bytes 31-33 


VEE 


Entry point of phase in SVA (notes 1 and 5) 



Note 1: Only used for directory entries that are in storage. 

Note 2: The TTR is relative to the beginning of the directory. 

Note 3: PPP and EEE are not present if both are zero and the phase is not relocatable. 

Note 4: RR, R and AAA are only present if the phase is relocatable. 

Note 5: VEE is only present if the phase is SVA eligible. 

Note 6: Condense counter is used for incore directory entries (not SDL). 

Note: 

The last entry in the directory is a 12-byte with a dummy phasename (contains SX'FF"), a 
dummy TTR (contains XL3'00') and a dummy N (contains X'OO'). Directory entries in storage 
always have the standard length of 34 bytes (including the last entry). 



ROUTINE IDENTIFIERS (RID) 



NAME 


ID MEANING 


ACTION 


SYSTEM! D 


00 System error condition, for 
example, page fault in I/O 
interrupt handler 


Hard Wait 


REENTRID 


04 Page fault or GETREAL request 
in a reenterable routine 


Save PSW and regs to user task's 
system save area, set PIB DAT flag 
to call SVRETURN, and ENQU 
request 


USERTID 


08 Page fault from a disabled user 
task or disabled B-transient 


Cancel user task error code X'15" 


APPENDID 


OC Page fault in I/O appendage 
routine 


Cancel user task error code X'36' 


RESVCID 


10 Page fault in SVC 29 or 47 


Set saved PSW to reissue SVC when 
task is dispatched, ENQU page fault 
request 


DISPID 


14 Page fault in a routine which 
requires no information to be 
saved, for example, a page fault 
in the dispatcher 


ENQU page fault request 


PFARID 


18 Page fault in a page fault 
appendage routine 


Cancel user task error code X'15' 




1C RESERVERD 






1 D Page fault in a gated supervisor 
: service 
7F 


Save PSW a nd reg isters to user task's 
system save area, set PIB DAT flag 
to call INITSVC when task is dis- 
patched next. Close gate to routine 
(routine cannot be used until gate is 
opened). ENQU page request. (Any 
task trying to use a gated resource 
is placed in a wait state and marked 
resource bound. It is released from 
the wait state when the resource is 
ungated after the page request has 
been handled.) 



VTAM ADDRESS VECTOR TABLE (ISTAVT) 



Label 


Length 


Description 


ISTACVT 




ADDR OF VTAIVI CVT 


ISTAS49 




ADDROFSCV49CODE 


ISTAS53 




ADDR-OFSVC53CODE 


ISTCFCSA 




ADDR OF COiVliVIAND HANDLER 


ISTAPSEX 




ADDR OF APS EXIT 


ISTAPSTA 




ADDR OF APS TABLE 


ISTARID 




ADDR OF RID 


ISTVTTP 




ADDR OF CODE TO CHECK FOR 


ISTRETR6 




BASE REG FOR DOS DISPATCHER 


ISTRETR7 




RETURN REG FOR DISPATCHER 


ISTTTXSZ 






ISTVTTIK 


2 


VTAMRPTASKID 


ISTPHNM 


5 


PHASE NAME OF TRANSIENT 


ISTX1 


1 


TOLTEP SAVES SiO COND CODE 



Bytes 96-99 (X'60'-X'63') of the system communication region (SYSCOM) contain the address 
of VTAIVI Address Vector Table. 



ENTRY IN THE ASYNCHRONOUS PROCESS SCHEDULER (APS) OPTION TABLE 



Label 


Length 


Description 


APS FLAG 


1 


X'80' Exit REQ Flag in APSFLAG 




3 


Reserved 


APSCNT 


1 


Count of VTAM ACBs open 


VTAM FLAG 


1 


X'01 ■ SUBTSK run key 0/SUPSTATE 
X'04' VTAM SVC active 
X'02" VTAM appendage active 
X"08' VTAM user exit in CTL 
X'10" VTAM timer delay 




3 


Reserved 



CHAPTER V 

DOS/VSE SERVICE AIDS 



OLTEP 

Functions: 



• Diagnosing I/O errors 

• Verifying I/O device repairs and Engineering Changes 

• Checking I/O devices 



System Generation requirements: 
None 



Requirements for Execution of OLTEP: 

• OLTs and CDSs available in Core Image Library 

• Devices to be tested are in 'Ready'-Status 

• Any real partition having at least 20 K of Storage 

• If OLTEP runs in a VSE/POWER controlled partition or has to test devices being spooled by 
VSE/POWER, please consult the DOS/VSE-OLTEP SRL (GC33-5383) for special recom- 
mendations. 

JCLto invoke OLTEP: 



Statement 


Comments 


//JOBXXXX 


Mandatory 


//ASSGNSYSnnn.X'cuu- 


One ASSGN statement is necessary for each 
device tested or accessed by a test. None is re- 
quired if the device was permanently assigned. 


//UPSI01 

10 
11 


This statement is necessary if a console device 
is available but the test-run definition is to be 
entered via the input job stream (SYSIPT). 

This statement is necessary if READD data input 
is contained on diskette. 
This statement is used when both of the above 
options are being used. 


// EXEC IJZADOLT, 
REAL,[SIZE=NK] 

dev/test/opt/ 


Mandatory, OLTEP will run only in real. 
Size = parameter must be minimum of 20K. 
This will allow a 4K OLT to execute. 
If OLTs larger than 4K are to be run, the 
SIZE = parameter must specify a size equal to 
16K plus the size of the OLT. The size spe- 
cified must be multiple of 2K. 

This statement is included if the test-run defini- 
tions are entered via the input job stream. 


/* 


Mandatory 


/& 


Mandatory 



Table of Options 



Option 


Entry 


Description 


Testing 
Loop 


TL(n) 
NTL 


Recycle the test. If you specify a value (n), OLTEP runs the test 
the number of times indicated. If you do not specify a value, the 
test cycles 10 times. The maximum value allowed is 32,767 deci- 
mal. (See note 1) 


Error Loop 


EL(n) 
EL(I) 
NEL 


Authorizes any error loop coded in the OLT to be executed the 
specified number of times. If you specify a value (n), the test 
loops the number of times indicated. If you do not specify a 
value, the test loops the number of times indicated in the preface 
of the OLT. If you specify the character 1, a flag is set which 
indicates to the OLT, that it must loop indefinitely on the error. 
You can terminate the loop by specifying NEL following a re- 
quest for communications. (See note 1) 


Print 


PR 
NPR 


Print messages from the OLT. If you enter NPR, all messages 
originated by the OLT and normally designated for SYSLST are 
supressed. (See note 2) 


Error Print 


EP 
NEP 


Print diagnostic error messages from the OLT. The FE option 
overrides NEP when a first error is encountered (once per 
section). (See note 3) 



OLTEP ( Cont'd) 



Table of Options {. 



Option 


Entry 


Description 


Control 
Print 


CP 
NCP 


Print OLT start and termination messages on SYSLST and 
SYSLOG. 


Parallel 
Print 


PP(n) 
NPP 


Use the console device, in addition to SYSLST for OLT messages. 
Four levels of print are available on the parallel printer by enter- 
ing one of these numbers at (n). 

0: HEADER only 

1: HEADER, DESCRIPTION and COMMENTS 

2: HEADER and RESULTS 

3: HEADER, DESCRIPTION, COMMENTS and RESULTS 


First error 
Communica- 
tions 


EI 
NFE 


Forces a communications interval when the first error is encount- 
ered. (See note 3.) A message is printed indicating the test being 
run and the device being tested. This is followed by the 
01E105D message that allows you to: 

• Change the device and/or test fields. 

• Continue the test by entering R01,'///' or R01,'/ /(Option 
change)/'. 

• Enter any OLTEP verb. 

• Cancel OLTEP by entering R01,'CANCEL'. 

There cannot be a first error communication if a console device 
is not available. 


Manual 
Intervention 


Ml 
NMI 


Informs the OLT section to run all manual intervention routines 
within the test request. (Manual Intervention and RE are mutu- 
ally exclusive options.) 


Trace 


TR 
NTR 


Trace all functions called by OLT. )See note 4) 


EXT= 


EXT= 


Information following this option is passed to the OLT section 
by way of a 56-byte buffer. This information must be the last 
entry in the option field and can contain any character but 
a slash. 

EXAMPLE: 

R01,'181/2400C/TL,EXT=BLOCK4FFPRINT/' 

BLOCK 4FFPRINT goes into a buffer area within OLTEP and 
then passes on to the OLT section. 


The default options are underlined. 

Note 1: The FE option overrides the TL and EL options, unless NPR is also in effect. 
However if you enter R 01,'///' or R 01,'/ /(option change)/' at a first error 
communications interval, the TL and EL options, if specified, are in effect. 

Note 2: NPR without EL and/or TL is ignored. 

Note 3: Error print and FE are ignored if no print and either EL or TL are specified. 

Note 4: Routine-to routine linkage is not traced. Do not attempt to use Trace function 
when SYSLST is assigned to the test device. 



OLTEP ( Cont'd) 



Example of OLTEP Operation (in BG, but can also run in foreground) 



BG assgn sysOOI.x'IBT 

BG assgn sys002,x'182' 

BG // exec ijzadolt,real,size=nK (minimunT 20K) 

BG E102I OLTS RUNNING 

BG E134I WARNING - DASD VOLUME LABELED CEPACK NOT 

PROTECTED FROM WRITE 

BG E107I OPTIONS ARE NTL.NEL.NPP.FE.NMI.EP.CP.PR.N TR 

BG 01E105D ENTER--DEV/TEST/OPT-#- 



OLTEP is loaded into the 
back-ground partition 



Initial communications interval 



r01,-181/2400a//- 

El 191 NON-STANDARD TAPE LABEL 0181 



OLTEP finds a nonstandard labeled 
tape mounted on the test device 



BG 04E139D REPLY B TO BYPASS.R TO RETRV.P TO PROCEED (MAY DESTROY DATA) 



BG r04,-p' 

BG E158I ST2400AS UNIT 0181 

BG E129I FIRST ERROR COMMUNICATION T2400A 001 UNIT 0181 

BG E107I OPTIONS ARE NTL,NEL,NPP,FE,NMI,EP,CP,PR,NTR 

BG 01E105D ENTER-DEV/TEST/OPT/ 



Error encountered 



BG r01,'182//nfe.tl(2)/- 
BG E158I *T T2400A S UNIT 0181 
BG E158I ST2400AS UNIT 0182 
BG E158I TT2400AS UNIT 0182 
BG E 1581 S T2400A S UNIT 0182 



First error communications 
interval 



H Console interrupt key pressed 



BG E107I OPTIONS ARE TL,NEL,NPP,NFE,NMI,EP,CP,PR,NTR 
BG 01E105D ENTER-DEV/TEST/OPT 



R01,V2400c,e/ntl/' 

E158I *T T2400A S UNIT 0182 

E158I ST2400CS UNIT 0182 

E158I T T2400C S UNIT 0182 

E158I ST2400E S UNIT 0182 

E158t TT2400E S UNIT 0182 

E107I OPTIONS ARE NTL,NEL,NPP,FE,NMI,EP,CP,PR,NTR 

01E105D ENTER-DEV/TEST/OPT/ 



Interrupt communications 
interval 



r 01, 'cancel' 

1I00A READY FOR COMMUNICATIONS 



Test completion 
communications interval 









A 




OLTEP 
Resident Area 
(nucleus) 


8 


K 






Transient Manager, 
Tables, Constants, etc. 


















OLTEP 
Transient Area 
IJZACOMP, 
IJZAD003, 
etc. 


4 


K 












20K(^ 








Partitic 


LOGSCAN 
Input Buffer 
(allocated if 
partition is 
20K or larger) 


4 


< 






OLT Area 








T2400A, 
T2400B, 
T2311H, 
T2702A, 
etc. 


4 


K 




r 



OS/VS, DOS/VSE, VIVI/370 - EREP 
(Environmental Recording, Editing and Printing) 

The service aid program IFCEREP1 can be used to retrieve all or selected records from the input 
data set(s), edit the records, and write them to any specified output device supported by the 
Sequential Access Method (SAM). A direct access device may be required for allocation of a tem- 
porary work data set. 

Executing IFCEREP1 

Program IFCEREP1 is the main execution routine for running EREP. The parameters may be 
specified only via card (SYSIPT) input. 

The operator should execute the ROD command prior to running EREP from SYSREC. 

Executing IFCOFFLD 

Program IFCOFFLD is a special purpose load of EREP modules which is provided for clearing 
SYSREC, under emergency conditions, without losing the data recorded thereon. 

There are no parameters allowed when executing IFCOFFLD. 

• SYSREC is input. 

• SYS009 is the history output data set logical unit number. 

• System Summary Report is printed. 

• If message IFC1 191 is received, alter the SIZE paramter on the // EXEC card and, if necessary, 
alter the partition size. 



EREP Functions 



EREP Basic Functions 



1. Create an Accumulation data 
set from the SYSREC data set. 

2. Clear SYSREC. 

3. Copy an Input Accumulation 
data set to an Output Accumu- 
lation data set. 

4. Merge data from an Accumula- 
tion data set and SYSREC. 

5. Format Reliability Measure- 
ment data. 

6. Print detail description of hard- 
ware error records. 

7. Summarize and print statistics 
for device failures. 



EREP Reporting Functions 



1 . System Summary Reporting 

2. Trends Reporting 

3. Event History Reporting 

4. Media Error Statistics Reporting 

5. Threshold Reporting 

6. Record detail and/or Summary 
Reporting 

7. RDE Summary Reporting 

8. Offload 



EREP(. ...Cont'd) 
JCLforEREP 



Statement 


Usage 


//JOB EXAMPLE 


This statement initiates the job. 


//TLBL HISTINT 

//DLBL HISTIND 

//EXTENT SYS008,XXXX,1„XXXX,XX' 

//ASSGN SYS008,cuu 


These Job Control Statements are used to pro- 
cess History Input. Either History Input or 
SYSREC Input or both must be processed each 
IFCEREP1 execution. The ASSGN statement 
must always be used for History Input. The 
TLBL is used for Tape resident History Input; 
the DLBL and EXTENT for Disk resident 
History Input. 


//TLBL HISTOT 

or 
// DLBL HISTOD 
//EXTENT SYS009,XXXX,1„XXXX,XX' 
// ASSGN SYS009,cuu 


These Job Control Statements are used to create 
a History Output data set. The TLBL statements 
is used for Tape resident History Output; the 
DLBL and EXTENT statements are used for 
Disk resident History Output. 


//ASSGN SYS001,cuu 

// DLBL. IJSYS01 

// EXTENT SYS001,XXXX,1„XXXX,XX''2 


These Job Control Statements are used to define 
the temporary work data set on a direct access 
device. These statements are necessary when a 
History Input data set is read.^ EXTENT and 
DLBL statements should not be necessary as 
SYSOOl should already be defined for the link- 
age editor. The standard SYSOOl EXTENT 
should provide enough space for most IFCEREP1 
executions; at any rate, enough space must be 
allocated to store all records selected from the 
input data set(s). 


//EXEC PGM=IFCEREP1,SIZE=64K 


This statement specifies the program name to be 
executed. The minimum virtual region size for 
DOS/VSE is 100K. The default GETVIS area of 
36K is specified. 


The following system logical units are used by IFCEREP1 but should already be assigned. 

SYSREC The assignment for the System Recording Data 
Set must already be made. 

SYSLST Both message output and report output are sent 
to this logical unit. 

SYSLOG If SYSLST is unavailable, a termination message 
is written to the console. 

SYSIPT 1 FCEREP1 input parameters and control cards 
are input to this required system logical unit. 



I 



' Ask your system programmer how to code EXTENT statements. 

^ DISKWRK must be a ONE EXTENT Data Set. 

^ RDESUM and PRINT=NO do not require the Work Data Set for History Input. 



Logical Units Required by Function 



Logical Units 


EREP Keywords 


ACC=Y 


HIST=Y 


MERGE=Y 


RDESUM=Y 


ALL 


HIST=N 












OTHERS 




SYS009 


X 












SYS008 




X 


X 


X 






SYSOOl 




X 


X 








SYSREC 






X 




X 


X 


SYSLST 


X 


X 


X 


X 


X 


X 


SYSLOG 


X 


X 


X 


X 


X 


X 


SYSIPT 


X 


X 


X 


X 


X 


X 



EREP Keywords 

EREP uses Keyword parameters to determine the functions requested and any restrictions placed 
on the records to be processed. The default value is underlined, where applicable. Multiple para- 
meters within one Keyworcl have to be seperated by commas. Keywords which have operands 
Y or N may be abbreviated to the Keyword only to imply the Y value, o.g. ACC implies ACC=Y. 
for details please consult OS/VS, DOS/VSE, VM/370-EREP {GC28-0772). 



Keyword Parameters 


Purpose 


-ffj] 


Accumulate selected records 


Default exceptions are: MES, RDESUM 
and THRESHOLD 




CPU = {serial.model[,serial.model]) 
Maximum of 7 entries 


Select CPU by serial number (nnnnnn) and 
model (nnnn) 


CPUCUA = (serial.addr[,serial.addr]) 
Maximum of 4 entries 


Select unique device addresses on a specific CPU 


CUA = (entry [, entry]) 

Maximum of 8 entries 


Select device/control units by unique addresses 
(nXX,nnX or nnn where 
n=hex digit and X=character 'X' 


DATE = (yyddd [{;}yyddd]) 

Single date or date range 


Date span for selected records 


DEV= (type [.type]) 

Maximum of 8 entries 


Select device type (nnnn or nnXX 
where X = character 'X') 


DEVSER = (serial [,serial]) 

Maximum of 8 entries 


Select device serial numbers (nnnnnn), 
(3410/3420 devices only) 


EVENT [-{;;;}] 


Provide an event history report 


"-K^}] 


Indication for input data set 


Default exception is: RDESUM 




LI BAD R = address 


Select records by Line interface base address 
(XXXX - hexadecimal) 


LINECT = nnn 

Number of lines 
Default = 50 lines 


Number of Lines to be printed on a page 
(nnn -decimal) 


H=m 


Allows selection by channel/unit address and 
volume serial number (3410/3420 only) 


^^"^^ [={n}] 


Allows merging of EREP input 
(Accumulation data set + SYSREC) 


MOD = (mode! [,modei]) 

Maximum of 4 entries 


Select specific CPU-models (nnn or nnnn) 


f— 1 
PRINT J p^ > 

LnoJ 


Select format of printout (see Note 2) 


RDESUM =|jj]| 


Allows printing of RDE-information from IPL 


SHORT [=(^]] 


Allows suppression of detail printing of OBR- 
records 


rnnn -n 

svmcdeJ:jj, 

I nXXxJ 


Select records by fault symptom code 
(33XX-DASDsonly) 
n = hexadecimal digit 
X = character 'X' 


SYSUM [=(^)] 


Allows printing of a system summary report 


TABSIZE = nnnK 

Default = 4K for DOS/VSE 


Specify size of internal sort table 


TERMN = name 


Select records by terminal name (VTAM only) 



EREP (. . . . Cont'd) 

EREP Keywords ( Cont'd) 



Keyword Parameters 


Purpose 


THRESHOLD = (xxx,yyy) 

TIME = (hhmm^;} hhmm) 
TRENDS [=(^}] 

TYPE = [C][D][E][l][M][0][T] 

VOLID = (volser[,volser]) 
Maximum 4 entries 


Specify threshold v alue for temporary read/ 
write errors (3410/3420 only) - decimal digits 

Time span for selected records 

Generate a Trends report 

Select records by iheir type (see note 1 ) 

Select records by volume serial number 
(3410/3420/33XX only) - 1 to 6 alphameric 
characters 

Clear SYSREC after processing 



Note 1 
Record types 



Meaning 

CCH 
DDR 
EOD 
IPL 
MCH 
OBR 
MDR 



Selection Keywords* 

CPUCUA.CUA 
CPUCUA.CUA.DEV 



ERRORID 

CPUCUA,CUA,DEV,SYMCDE,TERMN,VOLID,DEVSER 

CPUCUA,CUA,DEV,LIBADR,VOLID 



•Other selection keywords apply to all record types 



SU Suppress full printing (print summary only) 

PS Print full record and summary 

PT Suppress summary printing (print full record only) 

NO Suppress full printing and summary printing 



I 



EREP ( Cont'd) 

Keyword Parameter Specifications not accepted by EREP (X = Conflicting Parameters) 





o 
o 


D 


< 


< 

=5 




> 


> 


fe 


Q 

< 

CD 




UJ 

a 

oc 


Q 

o 


H 
oc 

o 

T 


Q 

o 

> 


N 

<r 


oc 


i 


o. 

> 


Q 

o 


o 

oc 


Keyword 


< 


O 


o 


o 


Q 


Q 


Q 


X 


-" 


-1 


^ 


^ 


en 


CO 


1- 


H 


H 


\- 


> 


N 


ACC 














x 




























CPU 






X 


















X 
















X 


CPUCUA 




X 




X 






X 










X 
















X 


CUA 






X 


































X 


DATE 








































X 


DEV 














x' 




X^ 






















X 


DEVSER 


X 










x' 






X 






X 


X 


X 




X 








X 


HIST 






















X 


















X 


LIBADR 












x^ 


X 














X 




X 






X 


X 


LINECT 










































MERGE 
















X 


























MOD 




X 


X 








X 


























X 


SHORT 














X 




























SYMCDE 














X 




X 














X 








X 


TABSiZE 










































TERMN 














X 




X 










X 










X 


X 


TIME 








































X 


TYPE 








































X 


VOLID 


















X 










X 




X 








X 


ZERO 




X 


X 


X 


X 


X 


X 


X 


X 






X 




X 


_ 


X 


1. 


X 


X 





Notes: ' Devices 3410 and/or 3420 are allowed. 
^ Device 3705 is allowed. 



EREP Functions with allowable Keyword Specifications (x = Allowable): 



N. Keyword 
EREP N. 


Selection 


Input 


Output 


Control 


-) 


< 

o 


< 




> 


DC 


oc 
Q 

< 


Q 


Q 

o 

•> 


rr 


5 
1- 


Q- 


Q 


QC 


^ 


o 


oc 
n 


1- 
o 

z 
-J 


1 


o 


Functions N, 


& 


& 


3 

o 


S 


Q 


Q 


^ 


S 


>- 

V3 


h- 


>- 


^ 


2 


X 


^ 


I 


^ 


N 


EVENT 


X 




X 


X 


X 










X 


X 


X 


X 


X 


X 




X 


X 






MES^ 


X 




X 


X 


x^ 


X 










X 




X 


X 


X 






X 


X 




PRINT=PS 


X 


X 


X 


X 


X 




X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


x' 


PRINT=PT 


X 


X 


X 


X 


X 




X 


X 




X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


x' 


PRINT=SU 


X 


X 


X 


X 


X 




X 


X 


X 


X 


X 


X 


X 


X 


X 


X 




X 


X 


x' 


PRINT=NO 


X 


X 


X 


X 


X 




X 


X 


X 


X 


X 


X 


X 


X 


X 


X 


X 




X 


x' 


RDESUM 




























X 


X 






X 






SYSUM 








X 














X 






X 


X 


X 




X 


X 


x' 


TRENDS 






X 


X 


X 












X 


X 




X 


X 


X 




X 


X 




THRESHOLD 


X 




X 


X 


x^ 


X 










X 




X 


X 


X 






X 


X 





Notes: ' ZERO is acceptable only when no selective parameters are requested and a full print or 
Accumulation data set is generated. 
^ Devices 3410 and/or 3420 are allowed. 
' PRINT = PT, PS, or SU is allowed. 

During an execution of EREP one of the above functions is performed. The default function is 
PRINT=su which is underscored and generates summary reports for all data contained on 
SYSREC; this is the feaulted input. 



EXAMPLES FOR AN EREP-RUN: 

(For further examples please consult OS/VS, DOS/VSE, VM/370-EREP (GC28-0772)) 

1) Generating a System Summary Report from SYSREC 
In this example: 

• All data on SYSREC is summarized for the System Summary Report. 

• All records on SYSREC are written to an Accumulation data set and SYSREC is cleared. 

// JOBEREP 

// TLBL HISTOT 

// ASSGN SYS009.TAPE 

// EXECIFCEREP1 

SYSUM 

/• 

/& 

The TLBL and ASSGN statements define the History Output Data Set which resides on magnetic 
tape (Accumulation Data Set). 

The messages generated by EREP and the System Summary Report will be written to the device 
assigned to SYSLST. 

The EXEC statement specif ies that EREP is to be run. 

The SYSUM parameter read from SYSIPT specifies that a System Summary Report is to be 
generated. Effective defaults are ACC=Y and ZERO=Y; therefore, SDR records are dumped to 
SYSREC before data retrieval is begun. 

2) Printing selected records from an Accumulation data set 
In this example: 

• All DDR and GBR records for 33XX-devices with specific VOLIDs are printed on SYSLST. 

• Data are taken from a previously created Accumulation data set (SYS008). 

//JOB EREP 

//TLBLHISTINT 

// ASSGN SYS008,TAPE 

// EXECIFCEREP1 

TYPE=DO, PRINT=PS, ACC=N, DEV=(33XX) 

VOLID=( SYSRES, W0RK41, PVTVSE) 

/• 

/& 

The TLBL and ASSGN statements define the History Input Data Set which resides on magnetic 
tape (Accumulation data set). 

TYPE=DO specifies that DDR and OBR records are to be printed. 

PRINT=PS specifies full record an summary printing. 

ACC=N specifies that no accumulation has to take place. 

DEV=33XX specifies that only 33XX-related records are to be printed. 

VOLID=(SYSRES, . . .) specifies that only records related to the given VOLIDs are to be printed. 
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GLOSSARY OF ABBREVIATIONS USED IN EREP OUTPUT 



BYTES RD/SRCHD 


Megabytes Read/Searched 


CCH 


Channel Check Record 


CCH-CRH 


CCH-Channe! Reconfiguration Hardware 


CCH-INC 


CCH Incomplete Record 


CHNL 


Channel 


CKorCHK 


Check 


CMDorCMND 


Command 


CNTRL 


Control 


CNTRLR 


Controller 


COMP/MOD 


Component/Module 


CONS+UR 


Console plus Unit Record 


CORR 


Correctable 


CSECTID 


Control Section Identification 


CSW 


Channel status word 


C.U. 


Control Unit 


CUA 


Channel-control unit-device address 


DATA CKS COR R/RTRY 


Data checks correctable/retry 


DDR 


Dynamic Device Reconfiguration Record 


DDR-OPR 


DDR-Operator Requested 


DDR-SYS 


DDR-System Requested 


EOD 


End-of-Day Record 


EQUIP 


Equipment 


ERDS 


Error Recording Data Set (SYS1.L0GREC for OS/VS, SYSREC 




for DOS/VSE, Recording Cylinders for VM) 


ERROPS 


Error Operations 


FMT 


Format 


HDRSER 


Header(tape)/serial number of drive that created tape 


ID 


Identification 


INV 


Invalid 


IPL 


Initial Program Load 


LEN 


Length 


MCH 


Machine Check Record 


MCH-TRM 


MCH-System Terminated 


MDR 


Miscellaneous Data Record 


MIH 


Missing Interrupt Handler Record 


MIH-CE 


MIH-Channel End Pending 


MIH-DE 


MIH-Device End Pending 


OBR 


Outboard Record 


OBR-DMT 


OBR-Dismount Record 


OBR-EOD 


OBR End of day 


OBR-PRM 


OBR-Permanent error record 


OBR-SHT 


OBR-Short Record 


OBR-TMP 


OBR-Temporary Error 


OVERRN 


Over run 


OVERRUN CDDA/CDDA 


Overrun Command Data/Command Data 


PERM 


Permanent 


PRGM INT 


Program Initiated 


PROG-EC 


Program-Extended Control Mode 


PSW 


Program Status Word 


RCYRYXIT 


Recovery Exit module 


REC-TYP 


Record Type 


RTN 


Routine 


SCP 


System Control Program 


SEEKS CNTR/HH 


Seek errors Cylinder Track/Head 


SFT 


Software Record 


SFT-ABN 


SFT-ABEND record 


SFT-MCH 


SFT-Machine Error, recoverable 


SFT-PI 


SFT-Program Interrupt 


SFT-RST 


SFT-Restart 


SSYSID 


Sub-system Identification 


TEMP 


Temporary 


TERM 


Terminal 


WRTS 


Writes 



Note: Most other abbreviations are meant only for the Customer Engineer, and are not 
meaningful to other personnel, even in translation. 



The DOS/VSE SDAID provides all of the functions that have been available with programs PDAID 
and SDAID under DOS/VS Releases 34 and before, plus a number of'addltional functions. 

Requirements 

• DOS/VSE 

• SDAID virtual space 100 KBytes 

• SDAID BASIC real space 11 KBytes 



• Time dependent programs may not be debugged. 

How to execute SDAID from the OPERATOR Console 

SDAID provides a prompting facility, which will assist you in entering the control commands, 
needed by SDAID. 

To request a prompting information, you should enter a question mark (?) in response to 
SDAIDs promting message. If you had made an error in control commands, key in two question 
marks (? ?) and hit END/ENTER. This causes SDAID cancel all control commands. 

The following is an example in which SDAID is used to trace SIO activities. 

SDAID will be started by entering in attention routine (AR) the command. 

SDAID a 

4C05I Processing of 'SDAID' Command Successful 

TRACE D 

4C08D Specify TRACE Type.+ 

SIO D 

4C08D Specify Type of lO/SIO TRACE. + 

UNIT D 

4C08D Specify Unit Address(es). + 

02C D 

4C08D Specify Output. + 

CCW D 

4C08D Specify Occurrence Range. + 

D 

4C08D Specify 'HALT' or 'NOHALT' or Press END/ENTER. 

D 

4C08D Specify Termination Options. + 

D 

4C05I Processing of 'TRACE' Command Successful 

OUTDEV P=E D 

4C05I Processing of 'OUTDEV Command Successful 

READY D 

4C05I Processing of 'READY' Command Successful 

STRTSD D 

4C05I Processing of 'STRTSD' Command Successful 

Note: D = Operator Presses END/ENTER Key. 



I 



Command 


Summary of purpose 


Add'l infc 
quested b^ 
yes 


) re- 

^ SDAID 
no 


AREA 


Establishes the address range within which the occurence 
of the specified event (s) is (are) to be traced. An AREA 
command may be overridden by the area definition of a 
TRACE command, but only for the event(s) specified in 
that TRACE command, if, for an SDAID session, no 
AREA command is submitted, you must provide an area 
definition in each of your TRACE commands for the 
session. 


X 




OUTDEV 


Establishes the method of trace information output. 
The command is mandatory. 


^ 




TRACE 


Establishes the program event(s) to be traced. At least 
one TRACE command must be entered per SDAID 
session; up to ten different trace commands may be sub- 
mitted per SDAID session. 

The command is mandatory. 


X 




READY 


Ends SDAID initiation command input (AREA, OUTDEV, 
and TRACE commands, which must precede the READY 
command). 

The command is mandatory. 




X 


STRTSD 


Starts SDAID execution. The command may follow the 
READY command or a STOPSD command, if one was 
entered. 

The command is mandatory. 




X 


STOPSD 


Stops SDAID execution. The command is optional. 
If entered, it must follow a STRTSD command. 




X 


ENDSD 


Ends SDAID execution. The command must be issued at 
the end of an SDAID session; it requests SDAID to 
release all system resources that the program used during 
the preceding session. 




X 



Summary of available SDAID commands 

Note: For more information and detailed description of SDAID refer to the 
DOS/VSE Serviceability Aids and Debugging Procedures. 



-SPECIFY TRACE AREA. 



-SPECIFY TYPE OF LIMITS. 

-SPECIFY OFFSET RANGE. 
-OFFset- 



n ►! 0:» 

reladdrl:*- 

I reladdrl :re 



reladdr2 1 

SPECIFY ADDRESS RANGE. 



-d- 



SPECIFY NAME OF PHASE. 



-SPECIFY LIMITS OF SUPERVISOR AREA. 

J— SPECIFY ADDRESS RANGE. 
-ADDress — I 

-addrl 



-addrl 



addr2- 



'^ 



SPECIFY ADDRESS RANGE, 
addrl:* 



-SPECIFY ADDITIONAL TRACE AREA. 



-H' D-- 



(-^LT^ip- 
I— SVA— J 



J" 



-SPECIFY OFFSET RANGE. 

reladdrl:* 

reladdrl :reiar^dr2 — 



Specification path diagram for the AREA command 



SDAIO ( Cont'd) 



trace— I 
*¥* i-Bran 



■SPECIFY TRACE TYPE. 
Branch 



V Occurence 
' definition 



("TV Trace-o 
I /definitii 



Trace-output 
definition 



£ 



SPECIFY OP CODES OR- 



-op codes ' 

E)" 



■SPECIFY MONITOR CALL CLASS(ES) OR ■< 
MONitorcall-f 



r — SKt 



■PAGing- 



monitorclass-list —^ 

-SPECIFY PAGING TRACE OPTIONS. 
ALL 

(-^-f ENQ — r-L ) 



EENQ r 
HDL— ^ 
REQ 1 

r—bftiC 
I 1 



T 



REQ- 
SPECIFY PGM INTRRPT CODE(S) OR • 
PGMCheck-' 



n 



-pgmc codes ' 

Specify pgmload trace options. 

pspecify name of phase to be monitored or press end/enter. 



ALL 1 ^►- 

-(-^ HDL A-)-^ 

I REQ — • 

r-SPECIFY REGISTER NUMBER(S) OR ' 






SPECIFY REGISTER PATTERN, 
patterni— 



— patterni pattern2- 
-\2J ■''0 definition 



=f 



SPECIFY STORAGE PATTERN. 
STorage— 

pattern— 
-SPECIFY SVC NUMBER(S) OR " 



r— bh-tUihY SrUHAGfc KAI 11 

'^— T ° r 



rT\ Trace output 12) 

1 /definition 

VTAMIO — • partition id IsS I/O definition 



-SPECIFY PARTITION ID. 



Specification path diagram for the TRACE command 
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,— SPECIFY TRACE AREA. 



I — SPECIFY TYPE OF LIMITS. 

r— SPECIFY OFFSET RANGE. 

— OFFset ►mi 0:» 

reladdrl :• 



ADDress ►♦■ 



-reladdrl :reladdr2— 



SPECIFY ADDRESS RANGE. 



-J- 



SPECIFY NAME OF PHASE. 



-Supvr- 



>Hi ADDress- 



-SPECIFY LIMITS OF SUPERVISOR AREA. 

r— SPECIFY ADDRESS RANGE. 



-0- 

-addrl:^ 



"-i 



SPECIFY ADDRESS RANGE. 
addr1:« 



r— SPECIFY ADDITIONAL TRACE AREA. 

_^, □ -, 



HD 



-SPECIFY OFFSET RANGE. 

reladdrl :« ► 

reladdrl :reladdr2 



Specification path diagram for the TRACE command 



% 



SPECIFY RANGE 
-OF lO/SIO TRACE. 

—ALL 



-channel-address— 



-controlunit-daddress-i 



r— SPECIFY OUTPUT. 



—device-address— 



GReg 

CReg 

FReg 

COMReg- 
SYSCom- 

lOTab 

LTA 

PTA 

PIB 

CCB 



CCWD- 
TOD — 



Supvr — 
BUffer- 



SPECIVY 

"VDUMP/RDUMPAREA 

•RDUMP-^ dump definition- 

-VDump- 



J-VDU 
lP-#— di 

ID— J 



-SPECIFY VDUMP/RDUMP AREA. 

-SPECIFY TYPE OF LIMITS. 

J— SPECIFY OFFSET RANGE. 



r 



0:' 

-reladi:* 



^ 



SPECIFY ADDRESS RANGE, 
addrl:* 1 



l^SPECIFY OFFSET RANGE. 
reladi :• 



f 



SPECIFY ADDRESS RANGE, 
-addrl :* 



-SPECIFY OCCURRENCE RANGE. 

-SPECIFY HALTORNOHALT OR PRESS ENTER 



NOHALT r 



SPECIFY 
TERMINATION OPTION 

TERMinate ' 



r— TERI 
I 



Specification path diagram for the TRACE command 



r— SPECIFY OUTPUT DEVICE. 

SPECIFY SIZE OF WRAP BUFFER 

SPECIFY OUTPUT DEVICE FOR BUFFER. 



-Buffer- 



£ SPECIFY SIZ 
-nn ( I 



-SPECIFY PHYSICAL ADDRESS OF PRINTER/TAPE. 



-Printer— 
— Tape — 



-Printer- 
—Tape — 



Specification path diagram for the OUTDEV command 
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MAINTAIN SYSTEM HISTORY PROGRAM ( . . . . Cont'd) 



THE PURPOSE OF MSHP 

MSHP, an integral part of the DOS/VSE System Control Programming (DOS/VSE SCP), provides 
functions to: 

• Install programming support. 

• Apply corrections to existing programming support. 

• Record installation and service activities in a system history file in order to reflect the current 
status of your operational system. 

• Automatically compare on operational system's history with IBM-supplied information on 
requirements for installing additional programming support or applying corrections to the 
installed programming support. 

• Print various types of listings based on your system's history. 

For an effective system service, it is important to use the functions available through MSHP. 
Function Control Statements and Detail Control Statements not described in this Handbook are 
for internal use of IBM Software Support Personnel. 

INSTALLATION SUPPORT BY MSHP 

Prerequisites for installing different types of program packages vary. IBM program packages are 

designated as: 

• System (for example, DOS/VSE SCP) 

• Product (for example. System Installation Productivity Offering) 

• Component (for example, DOS/VS RPG II) 

• Feature (for example, VSE/Advanced Functions). 

You are informed in the transmittal letter of the type of programming support the shipment 
contains, and can then proceed with the installation in accordance with the applicable MSHP 
procedure provided in this Handbook. 

THE NEED FOR A SYSTEM HISTORY 

For an efficient and successful installation of a program package, it is essential that the history 
file of your operational system truly reflects-the status of the system, and that prerequisite 
programming support requirements are met. 



MSHP Processing Overview 




MSHP ( Cont'd) 

INSTALLING A SYSTEV 

The DOS/VSE SCP is distrr -:•:<: z~ -agr.etic tape or disk; the system's change status is reflected 
in its accompanying system h >::-,• •' e. Depending on the configuration of your system, you 
install DOS/VSE SCP starda'cr; c cr.line. 

• Standalone 

If your system operates with DCS VS Release 34 or an earlier release level, MSHP is not yet part 
of your system. Consequently, the r.'.SHP-provided installation support is not available to you. 
For initial installation of DOS/VSE SCP, it is therefore necessary that you install the system 
standalone. 

Standalone installation also applies if your system is configured without DOS/VS or DOS/VSE. 

For detailed information on standalone installation/generation, refer to DOS/VSE System 
Generation. 

• Online - see Installation Activities: INSTALL SYSTEM ONLINE 

THE HISTORY FILES 

MSHP uses two types of history files: 

• The System History File 

• The Auxiliary History File 

The system history file is part of the IBM-distributed system and is maintained under the file 
name IJSYSHF on the logical unit SYSREC. The file should be defined by a permanent entry in 
the system standard label area: 

// DLBL IJSYSHF, 'DOS.SYSTEM.HISTORY.fi LE',99/365 

// EXTENT SYSREC,serial-number,1,0,relative track, number of tracks 

The above statements define an area for the system history file; this area is expiration-date pro- 
tected just like the SYSRES file. 

The auxiliary history file is maintained under the file name IJSYS02 on the logical unit SYS002. 
If an auxiliary history file is carried over from one system to another code the following MSHP 
control statements to have MSHP create label definitions in the label area: 

DEFine History EXTent=numberl:number2 Unit=SYSnnn - 
ID='DOS.AUXILIARY.HISTORY.FILE' 

INSTALLATION ACTIVITIES 

Install System Online 

Online installation can be done only under the control of an operational DOS/VSE that includes 
MSHP and a current system history. 

If your installation does not include magnetic tape drives, you may produce a disk volume as 
shown under "Prepare for Tapeless Configurations". 

You may save your installations current history by executing the job given under "Save Your 
Current System History File". 

You may want to verify the installation. Use the FETRACE function of MSHP as shown under 
"Obtain an Installation Verification List"; execute the job on completion of the installation steps. 

Prepare for Tapeless Configurations (New System) 

This procedure may be used to produce, from the IBM-supplied magnetic tape that contains 
DOS/VSE, a disk volume that can then be used to install the system from disk. 

// JOB RESTORE DISTRIBUTION TAPE 

// ASSGN SYS006,cuu Input unit for distribution tape 

// ASSGN SYS005,cuu Disk pack 

// DLBL IJSYSRS,'DOS.SYSRES.FILE.'99/365,SD 

// EXTENT SYSRES,SYSRES 

// EXEC RESTORE 

ALLOC CL=ccc{tt),RL=ccc{tt),SL=ccc(tt),PL=ccc(tt) 
/• 

// ASSGN SYS002,cuu History file space 

// EXEC MSHP 
RESTORE HIST AUX 
DEF HIST AUX EXT= numberl :number2 History file copy on disk 

ID='DOS.SYSTEM.HISTORY.FILE' 
/* 
/& 



INSTALLATION ACTIVITIES ( . . . . Cont'd) 

Prepare for Tapeless Configuration (Component) 

This procedure may be used to produce, from the IBM-supplied magnetic tape that contains 
DOS/VSE, a disk volume that can then be used to install the component from disk. 

// JOB RESTORE DISTRIBUTION TAPE 

// ASSGN SYS006,cuu Input unit for distribution tape 

// ASSGN SYS007, cuu Output unit for PCL 

// ASSGN SYS008,cuu Output unit for PRL 

// ASSGN SYS009,cuu Output unit for PSL 

// ASSGN SYS002,cuu Auxiliary history file 

// EXEC MSHP 

RESTORE DTAPE 

DEF CLIB PRI V EXT=number1 :number2 Dl R=number3 

DEF RLIB PRIV EXT=number1:number2 DIR=number3 

DEF SLIB PRIV EXT=number1 :number2 DIR=number3 

DEF HIST AUX EXT=number1:number2 

/* 

/& 

Save Your Current System History File 

It is recommended to keep a copy of the current system history file for future control purposes; 
you may use the BACKUP or the COPY function of MSHP. Enter the following statements before 
commencing with Step 1 of the installation procedure. 

//JOB SAVE HISTORYFILE 

// EXEC MSHP 

COPY HISTORY SYSTEM AUXILIARY 

DEFINE HIST AUX EXT=number1 :number2. 

/* 

/& 

Obtain an Installation Verfication List 

To obtain the printout (on SYSLST), execute: 

// JOB RETRACE 

// EXEC MSHP 

RETR If a system overview is desired 

RETR COMP If a retrace on components is desired 

RETR FEAT If a retrace on features is desired 

/* 

/& 

PROCEDURE 1 : NEW SYSTEM TO CURRENT SYSRES FROM TAPE 

All install functions must be executed in the background partition (BG). 
Instead of using this procedure, it is recommended to use procedure 3 ("New System to New 
SYSRES from Tape") with a backup and restore step added at the end of that procedures. The 
following shows the backup job that would be required; it produces a standalone restore version. 
For the standalone restore job, refer to DOS/VSE System Generation. 

// JOB BACKUP 

// ASSGN SYS006,cuu Tape 

// ASSGN SYS005,cuu New SYSRES 

// DLBL IJSYSRS,'DOS.SYSRES.FILE' 

// EXTENT SYS005 

// EXEC BACKUP 

SA Standalone restore 

/& 



INSTALLATION ACTIVITIES .... Cont'd) 

Step 1 . Restore the Distribution Tace to Disk 

Mount the IBM-supplied distribution tape on the device assigned to SYS006. Then execute the 

following job. 

// JOB INSTALL NEW SYSTEM 

// ASSGN SYS006,cuu Distribution tape 

// ASSGN SYS005,cuu Disk for new SYS RES (see Note 1 ) 

// ASSGN SYS002,cuu Auxiliary history file 

// ASSGN SYS007,UA 

// ASSGN SYSOOB.UA 

// ASSGN SYS009,UA 

// EXECMSHP 

INSTALL SYSTEM FROMTAPE 

DEF CL SYS EXT=:number2 DIR=number3 

DEF RL SYS EXT=:number2 DIR=number3 

DEF SL SYS EXT=:number2 DIR=number3 

DEF PL SYS EXT=:number2 DIR=number3 

DEF LABELAREA EXT=number2 May be specified for FBA DASDs 

DEF HISTAUXEXT=number1:number2- 

ID='DOS.AUX. HISTORY. FILE' 
/• 
/& 

Note 1 : The disk for the new SYSRES need not be the same as the disk for the SYSRES of the 
running system, however, it must be of the same device type. 

On completion of Step 1 : 

• The system libraries have been restored from the distribution tape to the disk assigned as the 
new SYSRES volume. 

• The history file supplied on the distribution tape has been restored to the auxiliary history file 
(assigned as SYS002) on the disk assigned as the new SYSRES volume; the history file of your 
current system now reflects the status of the new system nerged with the old system; the 
components of the old system are flagged as obsolete. 

Step 2. System Generation Activities (Procedure 1) 

This step consists of a number of system generation activities such as: 

• Assemble and catalog the SUPERVISOR 

• Delete unwanted components (see Note below) 

• Assemble and catalog I/O modules 

Note: 

If a delete procedure deletes only part of a component, that component's entry is not removed from 

the history file. For details or system generation activities, refer to DOS/VSE System Generation. 

Step 3. Merge the Restored Libraries 

For this Step all Foreground partitions (FG's) must be inactive. Ensure that user — written pro- 
grams with IBM names such as $JOBACCT or $SYSOPEN are saved or renamed. Note that the 
Label information cylinder will also be copied; it may, therefore, be necessary to run the system 
standard labels again. 

//JOB MERGE NRS to RES 

// ASSGN SYS002,cuu 

// DLBL IJSYSRS, 'DOS.SYSRES.FILE' 

// EXTENT SYS002 

//EXECCORGZ 

MERGE NRS.RES 

COPY ALL 
/• 
/& 

Step 4. Remove Obsolete Entries 

Execute this tep if you want that the history file reflects exactly your generated system: 
// JOB REMOVE BACKLEVEL RELEASE ENTRIES 
// EXEC MSHP 
REM OBSOLETE (see Note) 
/* 
/& 

Note: 

To insure that valid history information is not removed from the history file, do not specify any 
other remove options other than OBSOLETE. 
5-21 
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MSHP (... Cont'd) 

INSTALLATION ACTIVITIES (. . . Cont'd) 

Step 5. Personalize the System History 

If the originally defined personalize record for the history file should reflect the new installation 
environment (ENV=), changes can be made by using a job example like the following: 

// JOB PERSONAL 

// EXEC MSHP 

PERS='customer-name' — 

ADDR='Location' - 

PHONE='Extension' - 

PROG='Programmer's name' — 

EN\/='Environment' 

/• 

/& 

This function updates the newly installed history file header records. 

PROCEDURE 2: NEW SYSTEM TO CURRENT SYSRES FROM DISK 

This procedure is identical to procedure 1, except for STEP 1 of that procedure, which must be 
replaced by the following job. 

Step 1. Install the Distribution Disk Volume 

For Installation of the IBM-supplied distribution disk volume(s), execute the job example: 

// JOB INSTALL NEW SYSTEM 

// ASSGN SYS002,cuu Auxiliary history file 

// EXEC MSHP 

INSTALL SYSTEM FROM DISK 

DEF HIST AUX EXT= numberl :number2 - 

ID='PID.suppIied.id' 
/• 
/& 

On completion of STEP 1 the history file of the current system then reflects the status of the 
new system merged with the old system. The components of the old system are flagged as 
absolete. 
At completion of this STEP 1 , continue with STEP 2 through 5 of procedure 1 . 

PROCEDURE 3: NEW SYSTEM TO NEW SYSRES FROM TAPE 

Some steps of this procedure are identical to procedure 1; refer to that procedure as indicated 
below. 

Step 1. Restore the Distribution Tape to Disk 
This step is identical to STEP 1 of procedure 1 . 

Step 2. System Generation Acitivites 

This step is identical to STEP 2 of procedure 1 . 

Step 3. Merge user Program 

This step may be used to merge user and other programs (for example, licensed IBM programs) 
from the current system to the new SYSRES. 

// JOB MERGE RES TO NRS 

// ASSGN SYS002,cuu 

// DLBL IJSYSRS,'DOS.SYSRES.FILE' 

// EXTENT SYS002 

//EXECCORGZ 

MERGE RES.NRS 

COPYCNEW 

COPYR NEW 

COPYS NEW 

COPYP NEW 
/* 
/& 

The COPY NEW Function copies only those members that do not already exist in the receiving 
Library. 



MSHP ( . . . . Cont'd) 

INSTALLATION ACTIVITIES ( . . . . Cont'd) 

Step 4. Copy the history file to the NEV/ SYSRES 

The updated system history file frcm the old pack (RES) is copied to the new SYSRES pack 
(NRES) and obsolete entries are removed by the following job example: 

// JOB COPY SYSTEM HISTORY 

// ASSGN SYS002,cuu 

// EXEC MSHP 

REM OBSOLETE 

COPY HISTORY SYSTEM AUXILIARY 

DEFINE HISTORY AUXILIARY EXTENT=number1: number2 - 

ID='DOS.SYSTEM.HISTORY.FILE' 
/• 
/& 

Step 5. IPL 

5.1. IPL from the new system. 

5.2. Apply standard labels to the system 

If IBM standard labels are not used the following statements should be contained in the labeljob: 

// DLBL IJSYSHF/DOS.SYSTEM. HISTORY.fi LE',99/365,SD (see Note 1) 

// EXTENT SYSREC,SYSRES,1,0,number1,number2 (see Note 2) 

Note 1 : 

The label information must be identical with the ID specification given in STEP 4. 

Note 2: 

number 1 , number 2 in the EXTENT statement must be identical with number 1 : number2 of 

the extent specified in the DEFINE statement of STEP 4. 

5.3. ENTER the command SET RF=CREATE 

Step 6. Personalize the System History 

//JOB PERSONAL 

// EXEC MSHP 

PERS='Company name' — 

ADDR='Location'- 

PHONE='Extension'- 

PROG='Programmer's name' — 

ENV='Environment' 

/* 

/& 

This function updates the newly installed history file header records. 

The PERSONALIZE function may be used to change any information contained in the header 

records. MSHP updates the field(s) selected by the PERSONALIZE keyword operands. 

Step 7. BACKUP the System 

//JOB BACKUP 

// ASSGN SYSOOe.cuu Tape 

// ASSGN SYS005,cuu New SYSRES 

// DLBL IJSYSRS.'DOS.SYSRES.FILE' 

// EXTENT SYS005 

// EXEC BACKUP 

SA Standalone restore 

/• 

/& 

For the standalone restore Job, refer to DOS/VSE System Generation. 

PROCEDURE 4: NEW SYSTEM TO NEW SYSRES FROM DISK 

This procedure is identical to procedure 3 except that in Step 1 (as shown in procedure 1 ) you: 

• Omit the assignments for SYS005 and SYS006 

• Code FROMDISK (instead of FROMTAPE) in the MSHP INSTALL statement. 

• Omit the Library definitions for CL, RL, SL, and PL. 
o Omit the define statement for the label area. 

• In the define statement for the auxiliary history file, use the ID provided on the PID volume. 
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STANDALONE PROCEDURE (Example of Console output) 

STEPl: 

* Mount Backup or Distr.tapeto ADDR cuu^and make iPLfrom it. 

• When SYSTEM enters WAIT STATE push ATT KEY at Console. 

***** STAND ALONE PROGRAMS LOADED ***** 

IF YOU WANT A LISTING.SPECIFY CUU OF PRINTER 

IF NOT, PRESS EOB. 

PRESS EOB ALSO, IF BUFFER NOT OR INCORRECTLY LOADED 

OOe 

SPECIFY TYPE OF PRINTER XXXXYY 

3211 

SPECIFY DATE MM/DD/YY 

01/11/79 

SPECIFY ONE OF THE FOLLOWING COMMANDS: 

FASTCOPY, INITDISK, RESTORE, INITEM, SURFANAL, END 

restore 

SPECIFY ADDRESS OF INPUT DEVICE CUU 

281 

SPECIFY TYPE OF INPUT DEVICE XXXXYY 

3420t9 

SPECIFY ADDRESS OF SYSRES DISK CUU OR EOB 

(PRESS EOB, IF ONLY PRIVATE LIBRARIES ARE TO BE RESTORED) 

144 

SPECIFY TYPE OF DISK XXXXYY 

3330 

ANY PRIVATE LIBRARY TO BE RESTORED ? YES/NO 

no 

8R430 TYPE NOVERIFY OR PRESS ENTER FOR WRITE VERIFICATION 

noverify 

8R01D *** GIVE SYSTEM LIBRARY ALLOCATIONS *** 

CL= 

8R03I ALLOC DEFAULTS TO 57(9) 

RL= 

8R03I ALLOC DEFAULTS TO 64(5) 

SL= 

8R03I ALLOC DEFAULTS TO 58(2) 

PL= 

8R03I ALLOC DEFAULTS TO 2(2) 

8R12D TYPE DESIRED LABEL FOR LIBRARY 

LABEL= 

8R14I FILEID = DOS.SYSRES.FILE 

8R15D TYPE GO IF ALLOCATION IS CORRECT 

go 

8R19I EQUAL FILE ID IN VTOC 

DOS.SYSRES.fi LE 

8R20D TYPE DELETE OR GIVE A NEW FILE ID 

delete 

8R14I FILEID = DOS.SYSRES.FILE 

8R13I EXTENT = TRK 1 -TRK 3476 

8R35I RESTORE OF SC LIBRARY IN PROGRESS 

8R36i RESTORE HAS BEEN SUCCESSFUL 

8R35I RESTORE OF SR LIBRARY IN PROGRESS 

8R36I RESTORE HAS BEEN SUCCESSFUL 

8R35I RESTORE OF SS LIBRARY IN PROGRESS 

8R36I RESTORE HAS BEEN SUCCESSFUL 

8R35I RESTORE OF SP LIBRARY IN PROGRESS 

8R36I RESTORE HAS BEEN SUCCESSFUL 

8R37I *** SYSRES RESTORED*** (Now the Distribution Tape is 

8R38I *** RESTORE COMPLETE *** positioned at the SYSTEM HISTORY 

*** END OF STAND ALONE PROCESSING *** FILE, ready for RESTORE STEP 3) 
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STEP 2: 

* IPL from NEW SYSTEM (EXAMPLE ADDR = 144) 

* APPLY LABELS30 INCL IJSYSHF'DOS.SYSTEM.HISTORY.FILE' 

* ENTER SET RF=CREATE 

STEP 3: 

* RESTORE SYS HISTORY FILE FROM DISTR TAPE 
//JOB RESTORE SYS HIST 

// ASSGN SYS006,280 DISTR TAPE 

//EXEC MSHP 

RESTORE HIST SYS 

/• 

// MTC RUN,SYS006 

/& 

STEP 4: 

* This Step consists of several SYSGEN Steps 

* 1. Delete UNWANTED components 

* 2. Assemble and catalog your own SUPVR 

* 3. Create a BACKUP 

* 4. Restore the SYSTEM 

* 5. Include USER Programs and LP's 

* 6. Perform DSERV and LSERV 

STEP 5: 

* Identical to Step 6 of procedure 3 

STEP 7: 

* CHECK the INSTALLATION by calling a HISTORY DUMP 
//JOB DUMP HIST 

// EXEC MSHP 

RETR COMP 

DUMPH 

/* 

/& 

INSTALL TOTAL COMPONENT TO SYSRES 

Install from Tape or from Disk 

To install from tape, use the following job: 

// JOB INSTALL COMPONENT FROM TAPE 
// ASSGN SYSOOS.cuu Distribution tape 

// ASSGN SYS007,cuu Output unit for PCL 

// ASSGN SYS008,cuu Output unit for PRL 

// ASSGN SYS009,cuu Output unit for PSL 

// ASSGN SYS003,cuu From unit for CORGZ PCL 

// ASSGN SYS001,cuu From unit for CORGZ PRL 

// ASSGN SYSOOO.cuu From unit for CORGZ PSL 

// ASSGN SYS002,cuu Auxiliary history file 

// OPTION CATAL 
// EXEC MSHP 

INST COMP FROMTAPE MERGE 
DEF CLIB PRIV EXT=number1:number2 DIR=number3 
DEF RLIB PRIV EXT=number1:number2 DIR=number3 
DEF SLIB PRIV EXT=number1 :number2 DIR=number3 
DEF HIST AUX EXT=number1 :number2 
/* 
/& 

On completion of this step (and after check and verification procedures are satisfied), the IBM- 
supplied total component is part of the current system library, and the history file of the total 
component is part of the current history file. 
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INSTALL TOTAL COMPONENT TO SYSRES (. . . . Cont'd) 

To install from disk, use the following job: 

// JOB INSTALL COMPONENT FROM DISK 

// ASSGN SYS003,cuu From-unit for CORGZ PCL distribution disk 

// ASSGN SYS001 ,cuu From-unit for CORGZ PRL distribution disk 

// ASSGN SYSOOO.cuu From-unit for CORGZ PSL distribution disk 

// ASSGN SYS002,cuu Auxiliary history file distribution disk 

// OPTION CATAL 

// EXEC MSHP 

INST COMP FROMDISK MERGE 

DEF CLIB PRIV EXT=number1:number2 

DEF RLIB PRIV EXT=number1:number2 

DEF SLiB PRIV EXT=numberl :number2 

DEF HIST AUX EXT=number1 :number2 

/* 

/& 

On completion of this step the IBM-supplied total component is part of the current system 
library, and the history file of the total component is part of the current system history file. 

INSTALL TOTAL COMPONENT TO PRIVATE LIBRARIES 

Refer to these procedures if you want to keep the total component on private libraries. 

Install from Tape or from Disk 

To install from tape, use the following job: 

// JOB INSTALL TOTAL COMPONENT FROM TAPE 

// ASSGN SYSRLB,cuu "] 

// ASSGN SYSSLB,cuu I Existing private libraries 

ASSGN SYSCLB,cuu J 

// ASSGN SYS006,cuu Distribution tape 

// ASSGN SYS007,cuu Output unit for PCL 

// ASSGN SYS008,cuu Output unit for PRL 

// ASSGN SYS009,cuu Output unit for PSL 

// ASSGN SYS003,cuu From-unit for CORGZ PCL distribution disk 

// ASSGN SYS001 ,cuu From-unit for CORGZ PRL distribution disk 

// ASSGN SYSOOO,cuu From-unit for CORGZ PSL distribution disk 

// ASSGN SYS002,cuu Auxiliary history file 

// OPTION CATAL 

// EXEC MSHP 

INST COMP FROMTAPE MERGE 

DEF CLIB PRIV EXT=number1 :number2 DIR=number3 ID='MSHP.PRIV.CLIB' 

DEF RLIB PRIV EXT=number1:number2 DIR=number3 ID='MSHP.PRIV.RLIB' 

DEF SLIB PRIV EXT=numb er1:number2 DIR=number3 ID='MSHP.PRIV.SLIB' 

DEF HIST AUX EXT=number1:number2 

/* 

/& 

ASSGN SYSCLB,UA 

At completion of this step, the component is on the private libraries as defined and the system 
history file reflects the installation of the component. 

To install from disk, use the following job: 

// JOB INSTALL TOTAL COMPONENT FROM DISK 

ASSGN SYSCLB,cuu To-unit for CORGZ PCL 

// ASSGN SYSRLB,cuu To-unit for CORGZ PRL 

// ASSGN SYSSLB,cuu To-unit for CORGZ PSL 

// ASSGN SYS003,cuu From-unit for CORGZ PCL distribution disk 

// ASSGN SYS001,cuu From-unit for CORGZ PRL distribution disk 

// ASSGN SYSOOO,cuu From-unit for CORGZ PSL distribution disk 

// ASSGN SYS002,cuu Auxiliary history file distribution disk 

// OPTION CATAL 

// EXEC MSHP 

INST COMP FROMDISK MERGE 

DEF CLIB PRIV EXT=number1:number2 ID='MSHP.PRIV.CLIB' 

DEF RLIB PRIV EXT=number1:number2 ID="MSHP.PRIV.RLIB' 

DEF SLIB PRIV EXT=number1:number2 ID='MSHP.PRIV.SLIB' 

DEF HIST AUX EXT=number1:number2 ID='pid.supplied.id' 

/* 

/& 

ASSGN SYSCLB,UA 

5-26 
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INSTALL PART COMPONENT TO SYSRES 

Some IBM program packages consist of an unlicensed portion of code (the "base part") plus the 
licensed portion of code (the "second part"). 

To install a "base" part, only Step 1 of this procedure needs to be executed; if the "base" part 
and the "second" part are to be installed, Step 1 and Step 2 must be executed. 

Install from Tape or from Disk 

Step 1. Install Base Part 

To install a base part from tape, use the following job: 

// JOB INSTALL BASE COMPONENT PART FROM TAPE (1) 

// ASSGN SYS006,cuu (2) Distribution tape 

// ASSGN SYS007,cuu (2) Output unit for PCL 

// ASSGN SYS008,cuu (2) Output unit for PRL 

// ASSGN SYS009,cuu (2) Output unit for PSL 

// ASSGN SYS003,cuu From-unit CORGZ PCL 

// ASSGN SYSO0O,cuu From-unit CORGZ PSL 

// ASSGN SYSOOI.cuu From-unit CORGZ PRL 

// ASSGN SYS002,cuu Auxiliary history file 

// OPTION CATAL 

// EXEC MSHP 

INST COMPFROMTAPE MERGE (3) 

DEF CLIB PRIV EXT=number1 :number2 DIR=number3 

DEF RLIBPRIV EXT=number1:number2 DIR=number3 

DEF SLIB PRIV EXT=number1 :number2 DIR=number3 

DEF HIST AUX EXT=number1 :number2 

/• 

/& 

To install a base part from disk, change the above job as follows: 

• Change in statement (1) the words "FROM TAPE" to read "FROM DISK". 

• Omit the assignments indicated by (2). 

• Change in statement (3) the word "FROMTAPE" to read "FROMDISK". 

• Omit DIR=number3 in the library definition statements. 

Step 2. Install Second Part 

To install a second part from tape, use the following job: 

// JOB INSTALL SECOND COMPONENT PART FROM TAPE (1 ) 

// ASSGN SYS006,cuu (2) Distribution tape 

// ASSGN SYS008,cuu (2) Output unit for PRL 

// ASSGN SYS009,cuu (2) Output unit for PSL 

// ASSGN SYSOOO.cuu From-unit CORGZ PSL 

// ASSGN SYS001 ,cuu From-unit CORGZ PRL 

// ASSGN SYS002,cuu Auxiliary history file 

// OPTION CATAL 

// EXEC MSHP 

INST FEATURE F ROMTAPE MERGE (3) 

DEF RLIB PRIV EXT=number1:number2 DIR=number3 

DEF SLIB PRIV EXT=number1 :number2 DIR=number3 

DEF HIST AUX EXT=number1 :number2 

/• 

/& 

To install a second part from disk, use the same job as in Step 2 except for the following changes: 

• Replace statement (1 ) by: 

// JOB INSTALL SEC COMP PART FROM DISK 

• Omit the assignments indicated by (2). 

• Replace statement (3) by: 

INSTALL FEATURE FROMDISK MERGE 

• Omit DIR=number3 in the library definition statements. 



I 



MSHP {. . . . Cont'd) 

INSTALLATION ACTIVITIES ( Cont'd) 

15. INSTALL PART COMPONENT TO NEW PRIVATE LIBRARIES 

Some IBM program packages consist of an unlicensed portion of code (the "base part") plus the 
licensed portion of code (the "second part"). 

To Install a "base" part, only Step 1 of this procedure needs to be executed; if the "base" part 
and the "second" part are to be installed. Step 1 and Step 2 must be executed. 

Install from Tape or from Disk 

Step 1. Install Base Part 

To install a base part from tape, use the following job: 

// JOB INSTALL BASE COMPONENT PART FROM TAPE 

// ASSGN SYS006,cuu Distribution tape 

// ASSGN SYS007,cuu Output unit for PCL 

// ASSGN SYS008,cuu Output unit for PRL 

// ASSGN SYS009,cuu Output unit for PSL 

// ASSGN SYS002,cuu Auxiliary history file 

// EXEC HSHP 

INST COMP FROMTAPE ATTACH 

DEF CLIB PRIV EXT=number1 :number2 DIR=number3 ID='NEW.PCL' 

DEF RLIB PRIV EXT=number1:number2 DIR=number3 ID='NEW.PRL' 

DEF SLIB PRIV EXT=number1:number2 DIR=number3 ID='NEW.PSL' 

DEF HISTAUX EXT=number1:number2 

/* 

/& 

To install a base part from disk, use the following job: 

// JOB INSTALL BASE COMPONENT PART FROM DISK 

// ASSGN SYS002,cuu Auxiliary history file 

// EXEC MSHP 

INST COMP FROMDISK ATTACH 

DEF HIST AUX EXT=numberl :number2 

/* 

/& 

It is assumed that standard labels are applied for the new private libraries before executing 
this step. 
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Step 2. Install Second Part 

To install a second part from tape, use the following job: 

// JOB INSTALL SECOND COMPONENT PART FROM TAPE (1) 

// ASSGN SYS006,cuu (2) Distribution tape 

// ASSGN SYS008,cuu (2) Output unit for PRL 

// ASSGN SYS009,cuu (2) Output unit for PSL 

// ASSGN SYSRLB.cuu 

// ASSGN SYSSLB,cuu 

// DLBL IJSYSRL/NEW.PRL" 

// EXTENT SYSRLB,,1,0,number1,number2 | Same as in the 

// DLBL IJSYSSL/NEW.PSL- define statements 

// EXTENT SYSSLB,, 1 ,0,number1 ,number2 \ in Step 1 . 

// DLBL IJSYSCL/NEW.PCL- 

// EXTENT SYSCLB„1,0,number1,number2 

ASSGN SYSCLB.cuu "^ 

// ASSGN SYSOO0,cuu ■\ From-libraries for CORGZ 

// ASSGN SYSOOI.cuu/ 

// ASSGN SYS002,cuu Auxiliary history file 

// OPTION CATAL 

// EXEC MSHP 

INST FEATURE FROMTAPE MERGE (3) 

DEF RLIBPRIV EXT=number1 :number2 DIR=number3 ID='MSHP.PRL' 

DEF SLIB PRIV EXT=number1:number2 DIR=number3 ID='MSHP.PSL' 

DEF HIST AUX EXT=number1 :number2 

/* 

/& 

To install a second part from disk, use the same job as in Step 2 except for the following changes: 

• Replace statement (1 ) by: 

// JOB INSTALL SEC COMP PART FROM DISK 

• Omit the assignments Indicated by (2). 

• Replace statement (3) by: 

INSTALL FEATURE FROMDISK MERGE 

• Omit the Dl R=number3 in the library define statements. 
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INSTALL PART COMPONENT TO EXISTING PRIVATE LIBRARIES 

Some IBM program packages consist of an unlicensed of code (the "base part") plus the licensed • 
portion of code (the "second part"). 

To Install a "base" part, only Step 1 of this procedure needs to be executed; it the "base" part 
and the "second" part are to be installed. Step 1 and Step 2 must be executed. 

Install from Tape or from Disk 

Step 1. Install Base Part 

To install a base part from tape, use the following job: 

//JOB INSTALL BASE COMPONENT PART FROM TAPE (1) 

// ASSGN SYS006,cuu (2) Distribution tape 

// ASSGN SYS007,cuu (2) Output unit for PCL 

// ASSGN SYSOOa.cuu (2) Output unit for PR L 

// ASSGN SYS009,cuu (2) Output unit for PSL 

ASSGN SYSCLB,cuu 

//ASSGN SYSRLB.cuu \ Target private libraries 

// ASSGN SYSSLB,cuu 

// ASSGN SYS003,cuu 

// ASSGN SYSOOO,cuu } From-libraries (see Note 1) 

// ASSGN SYSOOI.cuu 

// ASSGN SYS002,cuu Auxiliary history file 

// OPTION CATAL 

// EXEC MSHP 

INST COMP FROMTAPE MERGE (3) 

DEF CLIB PRIV EXT=number1:number2 DIR=number3 ID='MSHP.PCL' 

DEF RLIB PRIV EXT=number1:number2 DIR=number3 ID=*MSHP.PRL* 

DEF SLIB PRIV EXT=number1 :number2 DIR=number3 ID='MSHP.PSL' 

DEF HIST AUX EXT=number1:number2 

/* 

/& 

Note 1 : 

The logical units for the from-libraries are identical with output units SYS007, SYS008 

and SYS009. 

To install a base part from disk, use the same job as in Step 2 except for the following changes: 

• Change in statement (1 ) the words "FROM TAPE" to read "FROM DISK". 

• Omit the assignments indicated by (2). 

• Change in statement (3) the word "FROMTAPE" to read "FROMDISK". 

• Omit DIR=number3 in the library definition statements. 

Step 2. Install Second Part 

To install a second part from tape, use the following job: 

// JOB INSTALL SECOND COMPONENT PART FROM TAPE (1 ) 

// ASSGN SYS006,cuu (2) Distribution tape 

// ASSGN SYS008,cuu (2) Output unit for PRL 

// ASSGN SYS009,cuu (2) Output unit for PSL 

ASSGN SYSCLB,cuu ] 

// ASSGN SYSRLB,cuu > Target private libraries 

// ASSGN SYSSLB,cuu J 

// ASSGN SYSOOO.cuu \ From-libraries 

// ASSGN SYS001,cuu J 

II ASSGN SYS002,cuu Auxiliary history file 

// OPTION CATAL 

// EXEC MSHP 

INST FEATURE FROMTAPE MERGE (3) 

DEF RLIB PRIV EXT=number1:number2 DIR=number3 ID='MSHP.PRL' 

DEF SLIB PRIV EXT=number1:number2 DIR=number3 ID='MSHP.PSL" 

DEF HIST AUX EXT=number1:number2 

/* 

/& 
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To install a second part from disk, use the same job as in Step 2 except for the following changes: 

• Replace statement (1 ) by: 

// JOB INSTALL SEC COMP PART FROM DISK 

• Omit the assignments indicated by (2). 

• Replace statement (3) by; 

INSTALL FEATURE FROMDISK MERGE 

• Omit the DIR=number3 in the library define statements. 
INSTALL A COMPONENT IN SYSIN FORMAT (from Tape or Disl<) 
Step 1. Deblock 

//JOB DEBLOCK TAPE 

• Mount the input and output tape 
// ASSGN SYS004,cuu 
// ASSGN SYS005,cuu 
//EXECOBJMAINT 
•/LISTPARM=JOB 
•/DEBLOCK 
/• 
/& 

Step 2. Execute the SYSIN Job 
// ASSGN SYSIN.cuu 



Input tape 
Output tape 



List jobs on input tape (optional) 
Deblock input tape to SYSIN format 



"Tape" for install from tape 
"Disk" for install from disk 



Distribution tape 
Output unit for PRL 
Output unit for PSL 
From-unit for CORGZ PRL 
From-unit for CORGZ PSL 
Auxiliary history file 



INSTALL A FEATURE TO SYSRES 

The MSHP function INSTALL FEATURE is used to install IBM program packages designated 
as a feature. 

The following procedures apply when installing a feature from tape or disk to SYSRES. When 
installing a feature, either of the MSHP functions MERGE or ATTACH may be used; however, 
if the feature contains transient modules, MERGE should be used. 

Install from Tape or Disk 

To install from tape, use the following jobs: 

Step 1. Install the Feature 

// JOB INSTALL FEATURE FROM TAPE 

// ASSGN SYS006,cuu 

// ASSGN SYS008,cuu 

// ASSGN SYS009,cuu 

// ASSGN SYS001,cuu 

// ASSGN SYSOOO,cuu 

// ASSGN SYS002,cuu 

// OPTION CATAL 

// EXEC MSHP 

INST FEAT FROMTAPE MERGE 

DEF RLIB PRIV EXT=number1 :number2 DIR=number3 ID='MSHP.PRIV.RLIB' 

DEFSLIBPRIVEXT=number1:number2 DIR=number3 ID='MSHP.PRIV.SLIB' 

DEF HIST AUX EXT=number1 :number2 - 

ID='DOS.AUXILIARY.HISTORY.FILE' 
/* 
/& 

On completion of Step 1, the IBM-supplied feature libraries and the accompanying history file 
have been merged with your operational system. You may now verfy the installation by executing 
an MSHP RETRACE. 

Note that additional installation activities may be required to make the installed feature 
operational. 

DOWNLEVEL PROBLEM. If a downlevel problem has occured, MSHP does not merge the 
libraries and the history file to your operational system; instead, MSHP informs you (by means 
of a printout) which modules are affected and which PTFs (program temporary fixes) are required. 
In this case, provide the equivalent PTFs for the feature and apply these PTFs to the restored 
libraries as shown in Step 2; then continue with Step 3. 
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Step 2. Update Feature Libraries 

Apply the RTFs required to resolve the "downlevel" problem that became apparent in Step 1. 

//JOB SELECT RTF's 

// ASSGN SYS002,cuu Restored auxiliary history 

// ASSGN SYS001 ,cuu MSHP workf ile 

// ASSGN SYS003,cuu MSHP worl<file 

// ASSGN SYS004,cuu Feature PTF tape 

// ASSGN SYSRLB.cuu 

// ASSGN SYSSLB.cuu 

// DLBL IJSYSRL/MSHP.PRIV.RLIB' 

// EXTENT SYSR LB,, 1,0,number1,number2 Restored RLB 

// DLBL IJSYSSL,'MSHP.PRIV.SLIB' 

// EXTENT SYSSLB,,1,0,number1,number2 Restored SLB 

// OPTION CATAL 

// EXEC MSHP 

SELECT PTF DLIB 

DEFINE HIST DLIB EXT=number1:number2 - 

ID='DOS.AUSILIARY.HISTORY.FILE' 
PTF UDnnnnn 
PTF UDnnnnn 
PTF UDnnnnn 
PTF UDnnnnn 
/• 
/& 

On completion of this step, the feature libraries have been updated with the required PTFs. 

Step 3. Install Updated Feature Libraries 

This step installs the feature libraries you updated in Step 2. 

Note that the library and history definitions in this step must be identical to Step 1 . 

// JOB INSALL FEATURE FROM DISK 

// ASSGN SYSOOI.cuu From-unit for CORGZ PRL 

// ASSGN SYSOOO,cuu From-unit for CORGZ PSL 

// ASSGN SYS002,cuu Auxiliary history file 

// OPTION CATAL 

// EXEC MSHP 

INST FEAT FROMDISK MERGE 

DEF RLIB PRIV EXT=number1:number2 ID='MSHP.PRIV.RLIB' 

DEF SLIB PRIV EXT=number1;number2 ID='MSHP.PRIV.SLIB' 

DEF HIST AUX EXT=number1 :number2 - 

ID='D0S.AUXILIARY.H1ST0RY.FILE' 
/• 
/& 

On completion of this step, the feature has been successfully merged with the libraries of your 
operational system. You may now verify the installation by executing an MSHP RETRACE. 

To install from disk, use the following jobs: 
Step 1. Install the Feature 

//JOB INSTALL FEATURE FROM DISK 

// ASSGN SYS001 ,cuu From-unit for CORGZ PRL 

// ASSGN SYSOOO,cuu From-unit for CORGZ PSL 

// ASSGN SYS002,cuu Auxiliary history file 

// OPTION CATAL 

// EXEC MSHP 

INST FEAT FROMDISK MERGE 

DEF RLIB PRIV EXT=number1 :number2 ID='MSHP.PRIV.RLIB''l ID given at 

DEF SLIB PRIV EXT=number1 :number2 ID='MSHP.PRI V.SLIB' / time of restore 

DEF HIST AUX EXT=number1 :number2 - 

ID='DOS.AUXILIARY.HISTORY.FILE' 
/* 
/& 

On completion of Step 1, the IBM-supplied feature libraries and the accompanying history file 
have been merged with your operational system. You may now verify the installation by execut- 
ing an MSHP RETRACE. 

Note that additional installation activities may be required to make the installed feature 
operational. 

DOWNLEVEL PROBLEM: see Install a Feature to SYSRES from tape Step 1. 
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Step 2. Update Feature Libraries 

Apply the PTFs required to resolve the "downlevel" problem that became apparent in Step 1 . 

//JOB SELECT RTFs 

// ASSGN SYS002,cuu Restored auxiliary history 

// ASSGN SYS001 ,cuu MSHP workf ile 

// ASSGN SYS003,cuu MSHP workfile 

// ASSGN SYS004,cuu Feature PTF tape 

// ASSGN SYSRLB.cuu 

// ASSGN SYSSLB.cuu 

// DLBL IJSYSRL,'MSHP.PRIV.RLIB' 

// EXTENT SYSRLB„1,0,number1,number2 Restored RLE 

// DLBL IJSYSSL/MSHP.PRIV.SLIB" 

// EXTENT SYSSLB,,1,0,number1,number2 Restored S LB 

// OPTION CATAL 

// EXEC MSHP 

SELECT PTF DLIB 

DEFINE HIST DLIB EXT=number1 :number2 - 

ID='DOS.AUXILIARY.HISTORY.FILE' 
PTF UDnnnnn 
PTF UDnnnnn 
PTF UDnnnnn 
PTF UDnnnnn 
/* 
/& 

On completion of this step, the feature libraries have been updated with the required PTFs. 
Step 3. Install Updated Feature Libraries 
This step installs the feature libraries you updated in Step 2. 

// JOB INSTALL FEATURE FROM DISK 

// ASSGN SYSOOI.cuu From-unit for CORGZ PRL 

// ASSGN SYSOOO.cuu From-unit for CORGZ PSL 

// ASSGN SYS002,cuu Auxiliary history file 

// OPTION CATAL 

// EXEC MSHP 

INST FEAT FROMDISK MERGE 

DEF RLIB PRIV EXT=number1:number2 ID='MSHP.PRIV.RLIB' 

DEF SLIB PRIV EXT=number1:number2 ID='MSHP.PRIV.SLIB' 

DEF HIST AUX EXT=number1 :number2 - 

ID='DOS.AUXILIARY. HISTORY. FILE" 
/• 
/& 

On completion of this step, the feature has been successfully merged w/ith the libraries of your 
operational system. You may now verify the installation by executing an MSHP RETRACE. 

INSTALL A FEATURE TO PRIVATE LIBRARIES 

The MSHP function INSTALL FEATURE is used to install IBM program packages designated 
as a feature. 

The following procedures apply when installing a feature from tape or disk to private libraries. 
When installing a feature, either of the MSHP functions MERGE or ATTACH may be used; 
however, if the feature contains transient modules, MERGE should be used. The procedures 
assume that standard labels are used for the private libraries. 
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Install from Tape or from Disk 

To install from tape, execute the following jobs: 

Step 1. Install the Feature 

// JOB INSTALL FEATURE FROM TAPE 

// ASSGN SYS006,cuu Distribution tape 

// ASSGN SYS008,cuu "\ 

// ASSGN SYS009,cuu / see Note 1 

ASSGN SYSCLB.cuu | 

// ASSGN SYSRLB.cuu > Target private libraries 

// ASSGN SYSSLB,cuu J 

// ASSGN SYSOOO,cuu \ From-librariesfor CORGZ 

// ASSGN SYS001,cuu / 

// ASSGN SYS002,cuu Auxiliary history file 

// OPTION CATAL 

// EXEC MSHP 

INSTALL FEATURE FROMTAPE MERGE 

DEF RLIB PRIV EXT=number1 :number2 DIR=number3 ID="MSHP.PRIV.RLIB' 

DEFSLIB PRIV EXT=number1:number2 DIR=number3 ID="MSHP.PRIV.SLIB' 

DEF HISTAUX EXT=number1:number2 - 

ID='DOS.AUXILIARY.HISTORY.FILE' 
/• 
/& 

Note 1 : 

The extents must be different to the extents of existing private libraries (the target 
private libraries). 

On completion of Step 1, the IBM-supplied feature libraries and the accompanying history file 
have been merged with your operational system. You may now verify the installation by 
executing an MSHP RETRACE. 

Note that additional installation activities may be required to make the installed feature 
operational. 

DOWNLEVEL PROBLEM: see Install a Feature to SYSRES from tape Step 1 . 

Step 2. Update Feature Libraries 

Apply the PTFs required to resolve the „downlevel" problem that became apparent in Step 1. 

//JOB SELECT PTFs 

// ASSGN SYS002,cuu Restored auxiliary history 

// ASSGN SYS001 ,cuu MSHP workf ile 

// ASSGN SYS003,cuu MSHP workfile 

// ASSGN SYS004,cuu Feature PTF tape 

// ASSGN SYSRLB,cuu 
// ASSGN SYSSLB.cuu 
// DLBL IJSYSRL/MSHP.PRIV.RLIB' 
// EXTENT SYSRLB,,1,0,number1,number2 Restored RLB 
// DLBL IJSYSSL/MSHP.PRIV.SLIB* 
// EXTENT SYSSLB,„0,number1,number2 Restored SLB 
// OPTION CATAL 
// EXEC MSHP 
SELECT PTF D LIB 

DEFINE HIST DLIBEXT=number1 :number2- 
ID=■D0S.AUXILIARY.HIST0RY.FILE• 
PTF UDnnnnn 
PTF UDnnnnn 
PTF UDnnnnn 
PTF UDnnnnn 
/* 
/& 
On completion of this step, the feature libraries have been updated with the required PTFs. 
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Step 3. Install Updated Feature Libraries 

This step installs the feature libraries you updated in Step 2. 

// JOB INSTALL FEATURE FROM DISK 

// ASSGN SYSOOI.cuu From-unit for CORGZ PRL 

// ASSGN SYS0OO,cuu From-unit for CORGZ PSL 

// ASSGN SYS002,cuu Auxiliary history fiU 

ASSGN SYSCLB 

// ASSGN SYSRLB )■ Target private libraries 

// ASSGN SYSSLB 

// OPTION CATAL 

// EXEC MSHP 

INST FEAT FROMDISK MERGE 

DEF RLIB PRIV EXT=number1 :nunnber2 ID='MSHP.PRIV.RLIB' 

DEF SLIB PRIV EXT=number1:number2 ID='MSHP.PRIV.SLIB' 

DEF HIST AUX EXT=number1 :number2 - 

ID="DOS.AUXILIARY.HISTORY.FILE" 
/* 
/& 

On completion of this step, the feature has been successfully merged with the libraries of your 
operational system. You may now verify the installation by executing an MSHP RETRACE. 

To install from disk, use the following jobs: 
Step 1. Install the Feature 

// JOB INSTALL FEATURE FROM DISK 

ASSGN SYSCLB,cuu 1 

// ASSGN SYSRLB,cuu > Target private libraries 

// ASSGN SYSSLB,cuu J 

// ASSGN SYSOOO.cuu 1 From-libraries for CORGZ 

// ASSGN SYSOOI.cuu J 

// ASSGN SYS002,cuu Auxiliary history file 

// OPTION CATAL 

// EXEC MSHP 

INSTALL FEATURE FROMDISK MERGE 

DEF RLIB PRIV EXT=numberl:number2 ID='MSHP.PRIV.RLIB' 

DEF SLIB PRIV EXT=number1:number2 ID='MSHP.PRIV.SLIB' 

DEF HIST AUX EXT=number1 :number2 - 

ID='DOS.AUXILIARY.HISTORY.FILE' 
/* 
/& 

On completion of Step 1, the IBM-supplied feature libraries and the accompnying history file 
have been merged with your operational system. You may now verify the installation by 
executing an MSHP RETRACE. 

Note that additional installation acitivites may be required to make the installed feature 
operational. 

DOWNLEVEL PROBLEM: see Install a Feature to SYSRES from tape Step 1. 
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Step 2. Update Feature Libraries 

Apply the RTFs required to resolve the "downlevel" problem that became apparent in Step 1 . 

//JOB SELECT PTFs 

// ASSGN SYS002,cuu Restored auxiliary history 

// ASSGN SYS001 ,cuu MSHP workf ile 

// ASSGN SYS003,cuu MSHP workfile 

// ASSGN SYS004,cuu Feature PTF tape 

// ASSGN SYSRLB.cuu 

// ASSGN SYSSLB,cuu 

// DLBL IJSYSRL/MSHP.PRIV.RLIB' 

// EXTENT SYSRLB„1,0,number1,number2 Restored RLB 

// DLBL IJSYSSL/MSHP.PRIV.SLIB- 

// EXTENT SYSSLB,,1,0,number1,number2 Restored S LB 

// OPTION CATAL 

// EXEC MSHP 

SELECT PTF DLIB 

DEFINE HIST DLIB EXT=number1:number2 UNIT=SYS002 - 

ID='DOS.AUXILIARY.HISTORY.FILE' 
PTF UDnnnnn 
PTF UDnnnnn 
PTF UDnnnnn 
PTF UDnnnnn 
/* 
/& 

On completion of this step, the feature libraries have been updated with the required PTFs. 
Step 3. Install Updated Feature Libraries 
This step installs the feature libraries you updated in Step 2. 

// JOB INSTALL FEATURE FROM DISK 

// ASSGN SYS001 ,cuu From-unit for CORGZ PRL 

// ASSGN SYSOOO,cuu From-unit fo r CORGZ PSL 

// ASSGN SYS002,cuu Auxiliary history file 

ASSGN SYSCLB,cuu 

// ASSGN SYSRLB.cuu Target private libraries 

// ASSGN SYSSLB,cuu 

// OPTION CATAL 

// EXEC MSHP 

INST FEAT FROMDISK MERGE 

DEF RLIB PRIV EXT=number1 :number2 ID='MSHP.PRIV.RLIB" 

DEFSLIBPRIV EXT=number1:number2 ID='MSHP.PRIV.SLIB" 

DEF HIST AUX EXT=number1 :number2 - 

ID="DOS.AUXILIARY.HISTORY.FILE' 
/* 
/& 

On completion of this step, the feature has been successfully merged with the libraries of your 
operational system. You may now verify the installation by executing an MSHP RETRACE. 



INSTALLATION ACTIVITIES (. . . . Cont'd) 



INSTALL A RELEASE 34 COMPONENT 



If a DOS/VS Release 34 product component (for example DOS/VS COBOL) is to be installed in 
a DOS/VSE, but without installation support by MSHP, proceed as follows. 



Install the component as described in the applicable documentation (for example, an Installa- 
tion Guide) available with the product. 

Step 2. Record the Installation 

For an up-to-date history file, the installation needs to be recorded in your system history. 
Submit a job as follows: 

//JOB NOTIFY HISTORY 
// OPTION CATAL 
// EXEC MSHP 

ARCHIVE xxxx-yy-zzz REL=RR.R 
/* 
/& 

where: 

xxxx-yy-zzz is the component name. For non-SCP related products, the name is normally derived 
from the program number; for example, if the program number is 5748-UT2, the component 
name would be 5748-UT-200. 

RR.R is the release level of the product for example RR.R=02.0 for Release 2 of a product. 



I 
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SI. APPLY A SINGLE PTF 

A single PTF consists or a single DOS/VSE job supplied by IBM in SYS IN format on magnetic 
tape or diskette or as a deck of cards. 

To apply a single PTF, place the applicable control statements ahead of the job stream supplied 
with the PTF and execute the job. On completion of the job, the PTF is applied to your 
operational system, and this application is reflected in your system history file. The control 
statements are: 

// DLBL IJSYSIN,'fiIe-ID'., codes 
// EXTENT SYSIN,serial-number 
ASSGN SYSIN,cuu 

Note: 

DLBL and EXTENT statements are only required if the input is from disk or diskette. If the 
input is from diskette and you use the IBM-supplied standard labels and the diskette file-id is 
DTTEPTF, the DLBL and EXTENT statements are not required. 

The Following are Job Examples of Single PTF Applications: 

// JOB UD 13854 

// PAUSE EOB OR CANCEL 

// OPTION CATAL 

// EXEC MSHP 

APPLY 5745 - SC - VSM: UD 13854 REL=35 

RESOLVES APARS = DY13415 

AFFECTS MODULES = IKQLAB 

OCCUPIES CLIB = 31 1 RLIB = 10 

INVOLVES LINK = IKQVSMLK 

DATA 

TXT 

END 

/$ 

/* 

/& 

Single PTF Application of a Backout PTF generated with the REVokable Option: 

// JOB UD13854 MSHP REVOKE PTF 

// PAUSE ASSGN LIBRARIES IF NEEDED 

// OPTION CATAL 

// EXEC MSHP 

REVOKE 5745-SC-VSM: UD13854 

DATA 

TXT 

END 

/$ 
/* 
/& 



SERVICE ACTIVITIES (. . . Cont'd) 

S2. APPLY COMULATIVE PTFs 

A cumulative PTF file consists of two or more single PTFs in SYSIN format on tape, disk, or 
diskette. The shipment also contains the cover-letter file with information such as the phases a 
PTF affects, detail description of the problem resolved, and required library sizes. 

In this procedure, information about PTFs is retrieved, selected PTFs are applied to the opera- 
tional system, and the PTF application is recorded in the current history file. 

To apply from tape, use the following jobs: 
Step 1 . List Cover Letter 

Cover letter information is given in specific files of the distributed material. Refer to the transmit- 
tal letter to find out which file applies and specify as shown below. 
// JOB PRINT COVERLETTER 
// ASSGN SYS004,cuu 

// MTC FSF,SYS004,n Note 1 

// EXEC MSHP 

LISTPTFFILESTATEMSEP Note 2 

PTF UD 12740 ^ 

PTF UD 13805 

I Note 3 

PTF UDnnnn J 

/* 

/& 

Note 1 : 

This statement positions the tape to the cover-letter file, where n is the sequence number of the 

cover-letter file minus one. 

Note 2: 

This statement prints, on SYSLST, the contents or the cover-letter file; SEP, if specified, forces a 

new print page to be started for each PTF information listing. 

Note 3: 

If you want only information for one or more specific PTFs, specify the pertinent PTF numbers. 

Omit the statements if you want a printout on all of the PTFs. 

Step 2. Apply PTFs 

// JOB SELECT PTFs FROM TAPE 

// ASSGN SYSPCH,TAPE 

// ASSGN SYS003,cuu MSHP workfile 

// ASSGN SYS001 ,cuu MSHP workfile 

// ASSGN SYS004,cuu Cumulative PTF tape 

// MTC FSF,SYS004,n Not 1 

// OPTION CATAL 

// EXEC MSHP 

SELECT PTF APPLY REVOKABLE Note 2 

PTF UD12740 

PTF UD1 3854 Note 3 

PTF UDnnnnn 

/• 

/& 

Note 1 : 

This statement positions the tape at the pertinent file. 

Note 2: 

The default is IRREVOKABLE. Specify REVOKABLE (as shown) if you wish that a "backout" 
is produced on SYSPCH for the PTFs you selected for application (SYSPCH should be assigned 
to a magnetic tape drive to avoid card punching). The output of a revocation can be applied as a 
normal PTF. 

Note 3: 

If one or more of the PTFs require corequisite PTFs, refer to the procedure "Apply Corequisite 

PTFs". 

To apply from disk, change the above jobs as follows: 

• Assign SYS004 to disk (instead of to tape). 

• Supply, in both Step 1 and Step 2, DLBL and EXTENT statements for SYS004 on disk. 
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S3. APPLY COREQUISITE PTFs 

The following procedures show how to apply corequisite PTFs from card and from a cumjnula- 

tive PTF tape. 

Note: For the creation of private libraries, please refer to MSHP USER'S GUIDE or DOS/VSE 

System Management Guide. 
Step 2 writes the two corequisite PTFs into the private libraries, and Step 3 applies the corequi- 
site PTFs to your system. 

Step 1. Copy History File to Auxiliary History 

//JOB COPY HIST TO AUX 

// EXEC MSHP 

// ASSGN SYS018,cuu 

COPY HIST SYS AUX 

DEF HIST AUX EXT=number1 :number2 - 

ID="DOS.AUXILIARY.HISTORY.FILE' 

UNIT=SYS018 

Step 2. First and Second Corequisite PTF Supplied on Cards 

// JOB SELECT COREQUISITE PTF 

// ASSGN SYS001 ,cuu MSHP Workf ile 

// ASSGN SYS003,cuu MSHP Workfile 

// ASSGN SYS004,cuu PTFs from card reader 

// ASSGN SYS018,cuu AUX HIST FILE defined in Step 1 

// ASSGN SYSRLB.cuu 

// ASSGN SYSSLB,cuu 

// DLBL IJSYSCL,-MSHP.PRIV.CLIB' 

// EXTENT SYSCLB,,,number1,number2 

// DLBLIJSYSRL,'MSHP.PRIV.RLIB' 

// EXTENT SYSRLB,,,number1,number2 

// DLBL IJSYSSL,'MSHP.PRIV.SLIB' 

// EXTENT SYSSLB,,,number1,number2 

ASSGN SYSCLB,cuu 

// OPTION CATAL 

// EXEC MSHP 

SELECT PTF DLIB 

PTF UDnnnnn 'l Specify the PTF numbers 

PTF UDnnnnn J to be selected 

DEF HIST SYS EXT=number1:number2- \ Note 

ID='DOS.AUXILIARY.HISTORY.FILE' Auxiliary history file J 

UNIT=SYS018 
/* 



} Insert card decks of selected PTF's 

Terminate the job by these additional cards 
Note: Same EXT=, EXT=, ID=,and UNIT= as used in Step 1 



^;} 



Step 3. Apply the PTFs 

This step applies the corequisite PTFs to the system by using the UPGRADE FROMDISK 
function. 

// JOB UPGRADE FROM DISK 

// ASSGN SYS003,cuu (1) 

// ASSGN SYS001 ,cuu From-unit for CORGZ PRL 

// ASSGN SYSOOO,cuu From-unit for CORGZ PSL 

// ASSGN SYS018,cuu Auxiliary history file 

// OPTION CATAL 

// EXEC MSHP 

UPGR FROMDISK FORCELINK 

DEFCL1BPRIVEXT=0:0 (1) 

DEF CLIB PRI V EXT=number1 :number2 ID='MSHP.PRIV.CLIB' 

DEF RLIB PRIV EXT=number1 :number2 ID='MSHP.PRIV.RLIB' 

DEFSLIB PRIV EXT=number1 :number2 ID="MSHP.PRIV.SLIB' 

DEF HIST AUX EXT=number1 :number2 - 

ID='D0S.AUXILIARY.H1ST0RY.FILE"- 

UNIT=SYS018 
/* 
/& 



^' I Note 2 
Notes 

Note 1 : The statments marked (1 ) are only necessary for compatibility reasons. 



5-40 
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Note 2: 

The EXT= and the ID= of the define statements for RLIB and SLIB must be identical to the 

DLBL and extent information of Step 2. The EXT= and the ID= of the DEF HIST AUX must be 

identical to that of Step 1 . 

Note 3: 

Same EXT= and ID= as used in Step 1 and 2. 

To Apply from Cumulative PTF Tape 

Step 2 and Step 3 write the first and the second corequisite PTF from the cumulative PTF tape 
to private libraries, and Step 4 applies the corequisite PTFs to your system. 

Note: For the creation of private libraries, please refer to MSHP USER'S GUIDE or DOS/VSE 
System ManagGment Guide. 

Step 1 . Copy History File to Auxiliary History 

//JOB COPY HIST TO AUX 

// ASSGN SYSOIB.cuu 

// EXEC MSHP 

COPY HIST SYS AUX 

DEF HIST AUX EXT=number1 :number2 - 

ID='DOS.AUXILIARY. HISTORY. FILE' - 

UN1T=SYS018 
/• 
/& 

Step 2. First Corequisite PTF 

// JOB SELECT COREQUISITE PTF 

// ASSGN SYS001 ,cuu MSHP workfile 

// ASSGN SYS003,cuu MSHP workfile 

// ASSGN SYS004,cuu PTF tape 

// ASSGN SYS018,cuu AUX HIST FILE defined in Step 1 

// ASSGN SYSRLB.cuu 

// ASSGN SYSSLB.cuu 

// DLBL IJSYSCL/MSHP.PRIV.CLIB- 

// EXTENT SYSCLB,,,number1,number2 

// DLBL IJSYSRL,'MSHP.PRIV.RLIB' 

// EXTENT SYSRLB,,1,0,number1,number2 

// DLBL IJSYSSL.'MSHP.PRIV.SLIB- 

// EXTENT SYSSLB„1 ,0,number1 ,number2 

ASSGN SYSCLB,cuu 

// OPTION CATAL 

// EXEC MSHP 

SELECT PTF DLIB 

PTF UDnnnnn 

DEF HIST SYS EXT=number1 :number2 - 

1D='D0S.AUXILIARY.H1ST0RY.FILE' 

UN1T=SYS018 
/* 
/& 

Note: 

Same EXT=, ID=, and UNIT=asused in Step 1. 

Step 3. Second Corequisite PTF 

Apply the second corequisite PTF in the same way as shown in Step 2. Note, the EXT= and the 
I D= of the DEF HIST SYS statement must be identical to that in Step 1. 

Step 4. Apply the PTFs 

This step applies the corequisite PTFs to the system by using the UPGRADE FROMDISK 
function. 

// JOB UPGRADE FROM DISK 

// ASSGN SYS003,cuu (1) 

// ASSGN SYS001,cuu From-unit for CORGZ PRL 

// ASSGN SYSOOO.cuu From-unit for CORGZ PSL 

// ASSGN SYS018,cuu Auxiliary history file 

// OPTION CATAL 

// EXEC MSHP 



:-> 
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UPGR FROMDISK FORCELINK 

DEFCLIBPRIVEXT=0:0 (1) 

DEF CLIB PRIV EXT=number1:number2 ID='MSHP.PRIV.CLiB" 

DEF RLIBPRIVEXT=numbGr1:number2ID='MSHP.PRIV.RLIB' "^ 

DEF SLIB PRIV EXT=number1:number2 ID='MSHP.PRIV.SLIB' / "^ote 2 

DEF HIST AUX EXT=number1 :number2 - 

ID='DOS.AUXILIARY.HISTORY.FILE' - Note 3 

UNIT=SYS018 
/* 
/& 

Note 1 : 
The statements marked (1 ) are only necessary for compatibility reasons. 

Note 2: 

The EXT= and the ID= of the define statements for RLIB and SLIB must be identical to the 
DLBL and extent information of Step 2. The EXT= and the ID= of the DEF HIST SYS must be 
identical to that of Step 1 . 

Note 3: 

Same EXT= and ID= as used in Step 1 and 2. 

84. RECORD A LOCAL FIX 

A "local fix" is a correction to a phase, module, and/or source statement book applied at a 
specific installation to resolve a problem. A local fix might eventually be covered by IBM-supp- 
lied PTFs, upgrades, or DLIBs. 

To keep an operational system's history file up-to-date, it is essential that you record the applica- 
tion of a local fix in the history file of your DOS/VSE. This can be done by using the MSHP 
control statement ARChive as shown below. 

// JOB RECORD FIX (Example Jobstream) 

// OPTION CATAL 

// EXEC MSHP 

ARC 5745-SC-VSM APAR=DY1 1592 

RESOLVES APARS=DY1 1500 

AFFECTS MODULE=IKQRCL Affected Module 

ALTER 000055 : EEEEFFFF ADDR: NEW TEXT (Applied Change) 

ARC 5745-SC-VSM APAR=DY12005 

RESOLVES APARS=DY12000 

AFFECTS PHASE=IPWSSPL Affected Phase 

ALTER 00035E 4700C005: 47FOCB25 ADDR OLDTEXT: NEW TEXT 

ARC5745-SC-DKE APAR=DY13713 

RESOLVES APARS=DY13700 

AFFECTS MAC=SGDSK SUBLIB=A Affected Macro 

DELETE 000250 : 000252 Deleted Macrolines FROMLINE: TOLINE 

REPLACE 000253:000254 FROMLINE:TOLINE to be replaced 

XXXX \ New Input Lines 

YYYY / For Replacement 

/S 

INSERT 000249 Insert Afterline 

XXXX "l New Lines 

YYYY / tobe inserted 

/S 

/* 

/& 

Notes: 

Control statements ALTER, REPLACE, DELETE, and INSERT are optional. If the statements 

are specified, they are recorded in the history file. The statements should be used to document, 

in detail, the fix applied. 

ALTER is used to record phase and module changes. One separate set of AFFECTS and ALTER 
statements has to be specified for each single phase/module. 

The statements REPLACE, DELETE, and INSERT are used to record macro changes. One 
separate set of AFFECTS, DELETE, etc. statements must be specified for each single macro. 

The RESOLVES statement may contain no other specification but a comment; this comment 
can be a string of up to 35 characters. Only one RESOLVES statement may be specified for one 
ARChive statement. 
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S5. APPLY PTFs OF THE RELEASE 34 MSHP FORMAT 

PTFs relating to components of the pre-DOS/VSE level are distributed in the "Release 34 MSHP 
format"; the following is an example of this format: 

// JOB N 12345 

* COMP 5745-SC-AIT 

* NPRE N67890 

* CORED N56789 

* PREN23456 

* SUPN34567 

* APPLREL 34.0,35.0 

* APARS FIXED E45678 

* MOD/MAC AFFECTED $$BATTNA 

* PHASES $$BATTNA 

* ENVIRONMENT DOS/VSSCP 

* BLOCKS CL=2,RL=3,SL=4 

* COMMENT THIS IS AN EXAMPLE OF A PTF 
// PAUSE EOB OR CANCEL 

// EXECMAINT 
CATALR . . . 

CATALS . . . 

/• 

// OPTION CATAL 
INCLUDE 

// EXEC LNKEDT 
/& 

"Release 34 MSHP format" PTFs, although their format differs from the "DOS/VSE MSHP for- 
mat", can be applied (under the control of MSHP) to the DOS/VSE. Release 34 MSHP format 
PTFs are numbered as Nnnnnn whereas DOS/VSE MSHP format PTFs are numbered as 
UDnnnnn. 

Note: 

If the PTF to be applied to a specific component includes a prerequisite or corequisite PTF that 
has already been applied to the system but not to the same specific component, then the appli- 
cation of the PTF fails due to requirements not met; message M151 1 is issued. In such case, 
eliminate the requirement statement (for example, the statement PRE N23456 in the above job) 
and rerun the application job. Message M151I is also issued if the pre- or corequisite PTF(s) have 
not been installed; in this case, correct the situation before applying the PTF. 

To Apply a Single PTF from Card, Magnetic Tape, Disk or Diskette 

Single PTFs may be supplied on card, magnetic tape, disk, or diskette. The job streams to apply 
a single PTF are as follows. 

Apply from Card 

// JOB APPLY R34 PTF 

// ASSGN SYS001,cuu MSHP workfile 

// ASSGN SYS003,cuu MSHP workfile 

// ASSGN SYSPCH,cuu Output for REVOKABLE 

// ASSGN SYS004,cuu Input from card reader 

// OPTION CATAL 

// EXEC MSHP 

ACCEPT OLDPTF APPLY REVOKABLE 

/* Terminating MSHP control statements 

// JOB Nnnnnn 



/* 
/& 
/* 
/& 



Release 34 MSHP format 
single PTF job cards 



Terminating input for SYS004 
Terminating MSHP job 
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Apply from Magnetic Tape 

// JOB SELECT R34 PTF's 

// ASSGN SYS002,cuu 

// ASSGN SYS003,cuu 

II ASSGN SYSPCH,cuu 

// ASSGN SYS004,cuu 

// MTC FSF,SYS004,n 

// OPTION CATAL 

// EXEC MSHP 

SELECT PTF APPLY REVOKABLE 

PTF N 12345 

/* 

/& 



MSHP workfile 
MSHP workfile 



Cumulative PTF tape 
If required 



Apply from Disk or Diskette 

The job stream is the same as that for "Apply from Magnetic Tape" above, except that: 

• SYS004 is assigned to the disk or diskette I/O unit. 

• DLBL and EXTENT statements must be given. 

To Apply Cumulative PTFs from Magnetic Tape or Disk 

Cumulative PTFs may be supplied on magnetic tape or on disk. The job streams to select PTFs 
and to apply the selected PTFs are as follows. 



Apply from Magnetic Tape 

//JOB SELECT 
// ASSGN SYS001,cuu 
// ASSGN SYS003,cuu 
// ASSGN SYS004,cuu 
// MTC FSF,SYS004,n 
// OPTION CATAL 
// EXEC MSHP 
SELECT PTF APPLY 
PTF N78910 



MSHP work file 
MSHP work file 
Cumulative PTF tape 
If required 



/* 
/& 

Apply from Disk 

//JOB SELECT 
// ASSGN SYS001,cuu 
// ASSGN SYS003,cuu 
// ASSGN SYS004,cuu 

// DLBI 

// EXTENT . . . 
// OPTION CATAL 
// EXEC MSHP 
SELECT PTF APPLY 
PTF N78910 



MSHP work file 

MSHP work file 

PTF disk file 

"\ Description of the 

/PTF file on disk 
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NOTATIONAL CONVENTIONS 

The syntax of both the function and detail control statements is represented as path diagrams as 
explained below: 

• The structure of a given statement is derived from its diagram by following the lines from left 
to right, and from top to bottom. The entries given in the diagram (for example, RE Lease = 
release-number-list) are selected according to the MSHP services required, and are then coded 
as described in the explanatory text for the given entry. 

At points of branching path lines, a choice must (or may) be made to select one, two, or 
more keywords. 

In a set of alternatives, one alternative may be shown inside a line of bullets, for example: 
• • • IRRevokable •• • 

This indicates the default used by MSHP if none of the alternatives in the set is coded. 

• In the diagram (and text), words given in all lower-case letters are symbolic; they must be 
replaced by user-supplied values as detailed in the discussions for the pertinent keywords. 

• Some of the all lower-case letter words (see above) end with the suffix '-list'. For example: 
release-number-list 

'list' means, that the symbolic word (release-number) may be coded up to 100 times. Thus: 
(release-numer-1, release-number-2,. . .) 

The code for a series of symbolic words must be enclosed in parentheses (see above). The mul- 
tiple code units must be separated in one of the following ways: 

— By one or more blanks, or 

— By a comment, or 

— By a comma (which in turn may be surrounded by one or more blanks, or comments) 

Commas and blanks as separators may be intermixed in a given 'list'. 

• In the diagrams, the path lines can be considered as instruction to code: 

— One or more blanks, or 

— One or more comments, or 

— One comma 

• The equal sign ('=') and colon (':') in the diagrams must be coded as shown. They may be 
surrounded by one or more blanks (or comment). 

• The diagrams show the terminating semicolon (';') for each statement. However, it is needed 
only, if a statement is to be followed by another statement on the same line. (For details, and 
for the continuation capability see the Rules for Coding MSHP Statements). 

As an example, the following shows the path diagram of the Apply statement. 

(1) (2) (3) (9) (4) (9) (5) (6) 

APply component : ptf-number 1 1 

' RELease = release-number-list ' 

(6) (7) (8) 



• ••IRRevokab!e««» 
' REVokable ' 

Comments: 

(1 ) 'APply is the command verb of the statement. 



(2) This is a part of the statement's total path line; this part indicates that you can code, bet- 
ween 'APply' and 'component', one or more blanks, one or more comments, or one comma. 

(3) 'component' and 'ptf-number' are symbolic words that must be coded according to the 
details given in the discussion of the statement. 

(4) 'RELease' is a keyword. 

(5) 'release-number-list' is a symbolic word; when coded, it gives the specification relating to 
the keyword 'RELease'. Code the symbolic word according to the discussion of the 
statement. 

'list' in the symbolic word means that for 'release-number' up to 100 release identifications 
may be specified. 

(6) The points indicate continuation of the path line; they must not be coded. 

(7) The bullets are part of the total path line and indicate the default. In this example, the 
default is 'IRRevokable'. 

(8) This is the terminator of the statement; it must be coded if the statement is to be followed 
by another statement on the same input line. 

(9) The colon and equal signs must always be coded. 

5-45 



MSHP CONTROL STATEMENTS ( Cont'd) 



Function 

Control 

Statements 



Keyword Operands 



ACCept- 



1 — APdIv— I 



•• IRRevokable** ••[ 
• RFVnkahlfi ' ' 1 



NODLIBbuild* 
DLIBbuild 



APPLICATION/EXPLANATION 

The ACCEPT statement requests MSHP to read single PTFs in the Release 34 card-format from 
SYS004 and to apply them. 

The Accept function needs two disk workf iles: 
IJSYS01 on SYS001. and IJSYS03 on SYS003. 

If the PTF is to be applied to private libraries, assignments must be made in the job invoking 
MSHP. Any assignments or PAUSE statements in the PTF job itself are ineffective. The same 
holds for // OPTION CATAL. It must be specified in the MSHP job. 



Related Detail Control Statements: 
Mandc ory: none 



Optional: DEFine 



APply 
IRRevokable 



NODLIBbuild 
DLIBbuild 



Indicates that a PTF of the 'old' format (the Release 34 format) is to be 
accepted. 

Specifies that the PTF is to be applied (see Note). 

When applying the PTF, no backout PTF will be generated, and the PTF can- 
not be revoked, that is, the status before the application of the PTF cannot 
be recreated at a later point in time. 

/Vhen applying the PTF, a backout PTF will be generated on SYSPCH. 

Restriction: When REVokable is specified, the PTF must not have any 
corequisites (must not specify C0= in the REQuires statement). 

Suppresses the DLIBbuild option (see below). 

This keyword is provided primarily for IBM internal use. Specify this option 
if the PTF is to be applied to libraries intended for preventive maintenance. 

Note: 

Default: The keyword APply may be omitted when option DLIBbuild is speci- 
fied. The omission of APply in this case indicates that the modules and/or 
macros of the PTF are to be catalogued in the respective libraries, but that link- 
edits according to "INVOLVES LINK = link-book-list" statement(s) are not 
to be performed (see INVolves detail control statement). 
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Function 

Control 

Statement 



Keyword Operands 



-RELease = release-number - 



' — SOFTreject- 
— RTF = ptf-number RELease = release-number 



-APAR = apar-number - 



"C 



RELease = release-number 



3 



APPLICATION/EXPLANATION 

The ARCHIVE statement is provided primarily for IBM internal use and is used to make entries 
in the system history file that accompanies IBM-provided programming support. The entries that 
can be made are for: 

• features 

• components 

• PTFs 

• Local/APAR fixes 

The statement may be used to record local fixes in an installed system's history file. 



Related Detail Control Statements: 
Mandatory: 



AFFects forARChive 
occupies component 
RESolves PTF 



Mandatory: AFFects 



for ARChive 
component 



Optional: AFFects 
DEFine 
occupies 
OR 

REQuires 
INVolves 
supersedes 
ALTER 
DELete 
INsert 
REPIace 
RESolves 



Specifies that an entry for a feature is to be made in the system history file, 
and details which one. 

A feature id can also be used to specify the precise release level of the program 
package that is to be archived. 

The feature id consists of three alphameric characters. 

Specifies that, providing the statement does not include PTF= or APAR= 
specifications, an entry in the system history file is to be made for a compo- 
nent, and the component's identification. Otherwise, "component" identifies 
the component to which the PTF or local fix (to be ARChived) is applicable. 

Component is a string of 1 1 characters, according to the following example: 
5745-SC-JCL 

Identifies the level of the release, maintenance, or version of a component, 
PTF, or local fix/APAR. 



MSHP CONTROL STATEMENTS { Cont'd) 
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release-number Specifies the release number to which the component, PTF, or local fix/APAR 
is applicable. 

SOFTreject Specifies that a PTF Application/Revokation for that component can be 

forced by the user, even if it partially overwrites a local fix or APAR correc- 
tion. 

For components, which are archived without this option, all RTFs overwriting 
partially local/APAR fixes will be rejected automatically. 

PTF Identifies the PTFs for which an entry is to be made in the history file. 

ptf -number Specifies the number of the PTF(s), for which a history file entry is to be 

made. 

ptf-number is a string of 6 or 7 characters, the first one or two being alpha- 
betic the remaining five being digits. 
For example: 
N 12345 
UD12345 

APAR Identifies that an entry in the system history file is to be made for a local fix. 

apar-number Specifies under which number the local fix is to be recorded in the system 
history file. 

apar-number is a string of 6 or 7 characters: 
one or two alphabetics, followed by five digits. 



Function 

Control 

Statement 



Keyword Operands 



• ••SYStem 
-Auxiliary 



APPLICATION/EXPLANATION 

The BACKUP statement requests MSHP to copy a history file located on disk onto magnetic 

tape. 

SYSPCH or tape must be assigned to SYS006. 



Related Detail Control Statements: 
Mandatory: none 



Optional: DEFine 



History Identifies this backup as a 'history file" backup. 

SYStem Specifies that the history file, that will be copied to tape, is the one with the 

file name IJSYSHF (which normally is the system history file). 

Auxiliary Specifies that the file with the file name IJSYS02 is the history file, and that 

the file is to be copied to tape. If the file IJSYS02 is not a history file, the job 
will be canceled (most likely with an "invalid length" IOCS error). 
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Function 

Control 

Statements 



Keyword OPerands 



-AUXiliary- 



-AUXiliary- 
-SYStem — 



APPLICATION/EXPLANATION 

The COPY statement requests MSHP to copy a history file from disk to disi<; either to create a 
copy of the system history file for use as an auxiliary history file, or to copy an auxiliary file to 
the system history file. 

The sequence of the keywords SYStem and AUXiliary defines the direction of the copy opera- 
tion. The first keyword specifies the source, and the second the target. The two keywords must 
be specified adjacent to each other. 



Related Detail Control Statements: 
Mandatory: none 



Optional: DEFine 



History Identifies the copy operation as an MSHP operation. 

SYStem Designates the history file with the file-name IJSYSHF. 

Auxiliary Designates a history file with the file-name IJSYS02. 



Function 

Control 

Statements 



Keyword Operands 



APPLICATION/EXPLANATION 

This statement is provided primarily for IBM internal use. The CREATE statement requests 
MSHP to Preformat a history file. MSHP creates the general header record. Further, space is pro- 
vided for the personalization information to be inserted with the PERsonalize statement. 



Related Detail Control Statement: 
Mandatory: none 



Optional: DEFine 



History Identifies the create operation as an MSHP operation. 

SYStem Specifies that the history file to be created be the one with the file-name: 

IJSYSHF 

Auxiliary Specifies that the history file to be created is to be the one with the file-name: 

IJSYS02 



Function 

Control 

Statements 



Keyword Operands 



'SYStem 
-Auxiliary 



The DUMP statement requests MSHP to produce a formatted hexadecimal printour of a history 
file on SYSLST. The records of the history file are identified by their RBA's (Relative Byte 
Addresses) for ease of pointer identification. 

Related Detail Control Statements: see CReate. 

History Identifies the dump operation as an MSHP operation. 

SYStem Specifies that the history file to be dumped is the one with the file-name: 

IJSYSHF 

Auxiliary Specifies that the history file to be dumped be the one with the file-name: 

IJSYS02 
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Function 

Control 

Statements 



Keyword Operands 



INCorporate component RELease = release-number -- 



APPLICATION/EXPLANATION 

The INCORPORATE statement identifies to MSHP and initiates a component distributed in 
SYSIN format. The job invoking MSHP with the function control statement INCorporate, must 
have // OPTION CATAL in effect. 



REIated Detail Control Statements: 

Mandatory: DATA 

occupies CLib 



Optional: DEFine 
INVolves 
OR 
REQuires 



component Identifies the component to be incorporated. 

Component is a string of 1 1 characters according to the example: 
5745-SC-JCL. 

RELease Identifies the level of release, maintenance, or version of a component. 

release number Specifies the level of release, maintenance, or version of the component to be 
incorporated. 



Function 

Control 

Statements 



Keyword Operands 



-COMPonents- 

-FEAtures 

-PRODuct 



FROMTape 
■FROMDisk- 



EMERge 
ATTarh ' 



APPLICATION/EXPLANATION 

The INSTall statement requests MSHP to install a new "system", one or more "components", 

one or more "features", or "products". 

Negative "requirements" ("NOT=") are always checked against the system history file. 

Checks for pre-requisite and co-requisite PTFs are performed against the operational system's 
history file and the distribution history file as well. 

Checks for "PRE=" and "C0=" requirements for components and/or features depend on the 
INSTall function being executed. The checks go against the system history or against the 
distribution history file, or against both. 

Related Detail Control Statements: 

Mandatory: DEFine libraries (see Note 1) Optional: DEFine History 

Note 1 : 

With INSTall SYStem, the libraries defined must be of the type SYStem. For all other INSTall 

functions, they must be of the type PRI Vate. 

SYStem Specifies that a system is to be installed. 

Restrictions: For restoring the distribution tape (see option FROMTape, 
the libraries in the DEFine statement must be of the type SYStem. 

With INSTall SYStem, MERge must not be specified, instead, the option 
ATTach must be used. 

Default: With INSTall SYStem, ATTach is the default. 

COMPonents Specifies that the somponent(s) from the distribution libraries are to be in- 
stalled. 

Restrictions: Same as described under 'PRODuct'. 

FEAtures Specifies that one or more features from the distribution libraries are to be 

installed. 
Restrictions: Same as described under 'PRODuct'. 
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PRODuct Specifies that the component(s) and feature(s) composing a complete execu- 

table version of a program package are to be installed from the distribution 
libraries. 

Restrictions: For restoring the distribution tape (see option FROiVITape 
below), the libraries defined in the DEFine statement must be of the type 
PRIVate. 

FROMTape Specifies that the installation source is the distribution tape assigned as SYS006. 

The library backups on the tape are restored by the INSTall function as 
private or system libraries, as specified in the DEFine statement. 
If the libraries are to be restored as system libraries, SYS005 must be assigned 
to the disk onto which the libraries are to go. If they are to be restored as pri- 
vate libraries, the following assignments must be effective: 
SYS007 for PRIVate CLib 
SYS008 for PRIVate R Lib 
SYS009 for PRIVate SLib 

FROMDisk FROMDisk must be specified to support the INSTall function for a system 

configuration without magnetic tape facility. 

Specifies that the restored modules, macros, and/or phases are to be copied to 
the system libraries, or to the assigned private libraries (if any). 

For the merge, the following assignments must be effective for the restored 

libraries: 

SYSOOO for SLib 

SYS001 for RLib 

SYS003 for CLib 

Restriction: This option must not be specified with INSTall SYStem. 
Specifies that the MSHP INSTall function ends with a message informing the 
user that the libraries can now be used in his system. Its use may simply be to 
assign the libraries as private libraries. 



MERge 



I 



Function 

Control 

STatement 



Keyword Operands 



e 1 — ir 

' — s- 



-, •••• CONTinuous* 
' SEParate- 



z;^ 



APPLICATION/EXPLANATION 

The LIST statement requests MSHP to retrieve information about the cumulative PTF file from 

that file, and to print the information in SYSLST. 

The device to read the cumulative PTF file must be assigned to SYS004. 



Related Detail Control Statements: 
Mandatory: none 



Optional: DEFine History 

PTF (if statement is specified) 



PTFfile Identifies the listing operation as an MSHP operation. 

INDex Identifies that the numbers of the PTFs contained in the cumulative PTF file 

are listed. 

The records of the cumulative PTF file are sequentially checked to contain a 
// JOB statement. If one is found, the job name (according to JCL syntax) is 
printed as PTF number. Together with the PTF number, the number of records 
from the // JOB statement up to and including the next record containing 
/& in columns 1 and 2, is listed. 

STatements Specifies that the following is printed on SYSLST: 

• Job Control statements (including JCL comments) 

• MAINT control statements 

• Linkage Editor control statements 

• MSHP control statements on the cumulative PTF file 

CONTinuous Specifies that the statements of the PTFs are printed without starting a new 
page for each PTF. 

SEParate Specifies that the statements of the PTFs are printed with the first statement 

of each PTF beginning on a new page. 
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Function 

Control 

Statement 



Keyword Operands 



— PTF = ptf-number 

— APAR = apar-number 

-PHase = phase-name 

-MODule = module-name — 
— FEAture = feature-id 

-MACro = macro-name 



■-SUBlib = sublibrary- 



APPLICATION/EXPLANATION 

The LOOKUP statement requests MSHP to display selected information from the system history 
fileonSYSLOG. 

If MSHP is invoked from SYSLOG, then the LOOKUP statement may be entered from SYSLOG. 



Related Detail Control Statements: 
Mandatory: none 



Optional: DEFine History 



component Specifies the component for which information is to be displayed. 

If component is specified without any further keyword operands, the following 
history information is displayed: 

• Component identifier 

• Release 

• Latest Service: PTF number of the most recently applied 

PTF and its application date, or NO PTF applied. 

• Invalidated APARS: APAR(S) which are partially overwritten by PTF 
forcing. (Valid for Components archived with the SOFTreject Option.) 

component is a string of 1 1 characters, according to the example: 5745-SC-JCL. 

PTF Indicates that for the given ptf-number, the history information is to be dis- 

played. 

ptf-number Specifies the PTF number for which information is to be displayed. 

ptf-number is a string of 6 or 7 characters, the first one or two being alpha- 
betic the remaining five being digits. 
For example: 
N 12345 
UD12345 

APAR Indicates that for the given a par-number, the history information is to be 

displayed. 

apar-number Specifies the APAR number for which information is to be displayed. 

apar-number is a string of 6 or 7 characters: one or two alphabetics, followed 
by five digits. 

PHase Indicates that for the given phase-number the information is to be displayed. 

phase-name Specifies the phase name for which information is to be displayed. 

phase-name is a string of one to eight alphameric characters: 
0-9, A-Z, #, $, and @ 

MODule Indicates that for the given module-name information is to be displayed from 

the system history file. 

module-name Specifies the module-name for which information is to be displayed. 

module-name is a string of one to eight alphameric characters: 
0-9, A-Z, #, $, and @ 

FEAture Indicates that for the given feature-id the following information is to be 

displayed: 

• feature-id 

• date of installation 

feature-id Specifies the feature for which information is to be displayed, 

feature-id is a string of three alphameric characters. 
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MACro Indicates that for the given macro-name the information is to be displayed 

from the history file: 

macro-name Specifies the macro-name for which information is to be displayed. 

macro-name is a string of one to eight alphameric characters: 

0-9, A-Z, #,S, and @ 

the first character must be alphabetics: A-Z, #, S, or @ 

SUBlib Identifies that the given sublibrary (see below) contains the source statement 

book. 

Default: If omitted, it is assumed that information is to be displayed for an 
E-type macro. 

sublibrary Specifies the sublibrary of the source statement library in which the macro is 

cataloged. 

sublibrary is one alphabetic character (A-Z). 



Function 

Control 

Statement 



Keyword Operands 



— ADDRess = "customer-address" 



;j~ 



-PHone = "phone-number" - 



— PRogrammer = "programmer-nam 



-ENVironment = "description"— 



APPLICATION/EXPLANATION 

The PERsonalize statement is used to identify the history file and relate it to a specific user. 
Changes can be made by re-coding the statement. 

Restrictions: Specification of PERsonalize without at least one operand is invalid. If the history 
file has not been specified before, specification of "customer-name" and "customer-address" 
is mandatory. 



Related Detail Control Statements: 
Mandatory: none 



Optional: DEFine History 



"customer-name" Specifies the user's name. 

customer-name is a string (enclosed in quotes) of one to twenty characters 
(not counting the quotes). (See Note) 

ADDRess Specifies that the given customer-address (see below) is to be entered. 

"customer-address" 

Specifies the customer's address. 

customer-address is a string (enclosed in quotes) of one to 45 characters (not 
counting the quotes). (Restriction: see Note below) 

PHone Specifies that the given phone-number (see below) is to be entered. 

"phone-number" Specifies the customer's telephone number. 

If a null string is specified, a previously specified number is erased. 

phone-number is a string (enclosed in quotes) of one to 17 characters 
(not counting the quotes). 

Note: Restriction: If the history file has not been personalized before, specification 

of customer-address is mandatory. 
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PRogrammer Specifies that the given programmer-name (see below) is to be entered. 

'programmer-name' 

Specifies the programmer's name. If a null string is specified, a previously speci- 
fied name is erased. 

programmer name is a string (enclosed in quotes) of one to 24 characters 
(not counting the quotes). 
A null string (two consecutive quotes) is accepted. 
EN Vironment Specifies that the given description (see below) is to be entered. 

•description' Specifies the environment description (for example, the release level). If a null 

string is specified, a previously specified name is erased. 

description is a string enclosed in quotes of 1 to 62 characters (not counting 

the quotes). 

A null string (two consecutive quotes) is accepted. 



Function 

Control 

Statement 



Keyword Operands 



-OBSOlete - 
-feature 



"E 



-RELease = release-number— 

■PTF = ptf -number 
APAR = apar-number- 



nc 



RELease = release-number 



J 



APPLICATION/EXPLANATION 

The REmove statement requests MSHP to erase entries from the system history file. The space 
in the history .file of the removed entries is freed for future usage. 



Related Detail Control Statement: 
Mandatory: none 



Optional: DEFine History 



OBSOlete Specifies that entries previously marked as obsolete are to be physically remov- 

ed from the history file. 

feature Specifies that a specific entry relating to a feature is to be removed. 

feature is a three alphameric character string identifying the feature entry. 

component If followed by: RELease = release-number 

component specifies which component entry is to be removed from the history 

file. 

If followed by: PTF = ptf-number or APAR = apar-number 

component specifies the component, of which a PTF or APAR entry is to be 

removed from the history file. 

component is a string of 1 1 characters according to the following example: 

5745-SC-JCL. 

RELease Indicates that for the given release-number (see below) entries are to be 

removed. 

release-number Specifies the release number for which the entries specified in the component, 
PTF, or APAR operand are to be removed, providing the entries pertain to 
the here given release-number. 

PTF Indicates that the given pft-number (see below) is to be removed. 

ptf-number Specifies the PTF number that is to be removed. 

ptf-number is a string of 6 or 7 characters, the first one or two being alphabetic, 
the remaining five being digits. 
For example: 
N 12345 
UD 12345 

APAR Identifies that the given apar-number (see below) is to be removed. The re- 

moval applies only to entries made when archiving a local fix. 

apar-number Specifies the APAR number that is to be removed. 

apar-number is a string of 6 or 7 characters: one or two alphabetics, followed 
by five digits. 
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Function 

Control 

Statement 



Keyword Operands 



• • SYStem < 
-Auxiliary 



APPLICATION/EXPLANATION 

The RESTore statement requests MSHP to write a history file located on magnetic tape onto 
disk. The tape must be assigned to SYS006 and, for processing, must be positioned to the file 
containing the history file. 

The RESTore Dtape function is normally restricted to copying private libraries. The libraries 
to be restored must be defined with the appropriate DEFine statement? The tape must be 
assigned as SYS006 and, for processing, must be positioned to the first file. 



Related Detail Control Statements: 
Mandatory: DEFine library if RESTore Dtape 



Optional: DEFine History 



History Identifies this restore operation as an MSHP operation. 

SYStem Specifies that the history file is to be copied to a disk file with the file nan'e: 

IJSYSHF 

Auxiliary Specifies that the history file is to be copied to a disk file with the file name: 

IJSYS02 

Dtape Assumes that the SYS006 assigned tape is a backup of libraries and of a 

history file, created with the BACKUP utility. The libraries are restored as 
PRIVate libraries subject to and as defined in the DEFine detail control 
statement. Assignments for the disk, onto which the libraries are to be copied, 
must be effective as follows: 
SYS007 for PRIVate CLib 
SYS008 for PRIVate R Lib 
SYS009 for PRIVate SLib 

The history file from tape is copied into an auxiliary history file 
IJSYS02 

on disk, assigned as SYS002, or as specified in the Unit-SYSnn parameter of 
the DEFine statement. Label definitions for this disk file must be effective, 
or the history file must have been defined in the detail control statement 
DEFine History AUXiliary, or 
DEFine History DLIBbuild 



Function 

Control 

Statement 



Keyword Operands 



I Dentif ier=component 



— FEAtures- 
-PTFs 



APPLICATION/EXPLANATION 

The RETrace statement requests MSHP to print information from the system history file on 

SYSLST. 

Default: If RETrace is specified but none of the keywords, a system overview printout from the 

history file is produced. 



Related Detail Control Statements: 
Mandatory: one 



Optional: DEFine History 



COMPonents Specifies that the component installation records are to be printed. 

I Dentif ier Identifies that information about the component specified in component 

(see below) is to be listed. 
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component Specifies the component for which a retrace is to be made. 

component is a string of 1 1 characters accord int to the example: 

5745-SC-JCL. 
FEAtures Specifies that the features installed are listed. 

PTFs Specifies that all PTFs applied are listed (in ptf-number sequence). 

APARs Specifies that all APARs are listed (in apar-number sequence) which were 

fixed by a PTF, or were corrected locally. 

MODules Specifies that all phases (core image library members), modules (relocatable 

library members), and macros (source statement library members) that are 
affected by a PTF or local fix are listed. 



Function 

Control 

Statements 



Keyword Operands 



L-APply— ' 



IRRevokable»« 
' REVokable 



• •NODLIBbuild»» 
— DLIBbuild- 



APPLICATION/EXPLANATION 

The SELECT statement is used to select individual PTFs from a cumulative PTF file (filename: 
PTF). Entries are made in the system history file for all the PTFs selected. 

The device the SELect function reads the cumulative PTF file from must be assigned to SYS004. 

The modules and/or macros of the selected PTFs are catalogued into the corresponding libraries 
(system or private, if assigned). Linkedits according to "linkbooks" contained in the selected 
PTF are only done, if the option 'APply' is specified. If 'APply' is specified, OPTION CATAL 
must be in effect and must have been coded in the job invoking MSHP with the SELect function. 

The SELect function can also be utilized to "revoke" individual PTFs. 

Selection of Release 34 format PTFs 

The cumulative PTF file may contain DOS/VSE-MSHP-format PTFs and PTFs of the Release 
34-MSHP-format. For the Release 34-MSHP-format PTFs, MSHP takes history information from 
JCL comment statements and builds the necessary MSHP control statements. 

Restrictions: 

• The number of APARS fixed must not exceed 255. 

• The PTF must not have more than 72 requisites (PRE, CO and NOT). 

• At most 32 PTFs can be superseded. 

• The selected PTF may not be applicable to more than six releases. 

Related Detail Control Statements: 

Mandatory: PTF Optional: none 

PTFf ile Distinguishes the selecting of PTFs from the cumulative PTF file from other 

select operations. 

APply Specifies that the selected PTFs are to be applied to the system. 

Default: The keyword APply may be omitted when option DLIBbuild is speci- 
fied (see below). The omission of APply indicates that the modules and/or 
macros of the selected PTFs are to be catalogued into the corresponding 
libraries (as in the case when APply is specified) but that linkedits according 
to the statement INVolves LINK=link-book-list are not to be performed. 

I R Revokable Specifies that when applying the PTF, no backout PTF is generated. That is, 
the PTF cannot be revoked (the status before the application of the PTF 
cannot be recreated). 

REVokable Specifies that, when applying the PTF, a backout PTF is generated on SYSPCH. 

The backout PTF is a job identical in structure with the job containing a PTF, 
except that the initiating MSHP function control statement inside that job is 
REVoke component: ptf-number. 

The "ptf-number" is the same as the one of the original PTF (for which the 

backout was generated). 

Restrictions: When REVokable is specified, DLIBbuild must not be specified. 
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NODLIBbuild NODLIBbuild suppresses the DLIBbuild option (see below). 

DLIBbuild Specify this option if the PTF is to be applied to preventive maintenance 

libraries. 

The effect of this option is: 

1. When a PTF involves linkediting (particularly a 'linkbook' that controls 
linking a component), all the phase names encountered will be reflected as 
'affected' in the system history file so that in the UPgrade function all the 
phases can be copied from the distribution libraries to the user's libraries. 

2. When a PTF needs a co-requisite PTF and this co-requisite is not present yet, 
application of the PTF will not be rejected (as with the NODLIBbuild 
option), but a warning message is issued. However, link edits (according to 
component link-books) will not be performed. 

Restrictions: REVokable and DLIBbuild are mutually exclusive options. 



Function 

Control 

Statement 



Keyword Operands 



• OLDsystem»< 
— NEWsystem— 



• v'ALL •••••••••••••••• 

— Except = exception-list 

— COMPonent = component-list— 



•••IRRevokable«»J ••FROMTape««« ••WHOLEjob** 
' REVokable ' ' FROMDISK ' ' — CONCIude 1 



U»»N( 
I Dl 



NODLIBbuild* 
LIBbuild 



APPLICATION/EXPLANATION 

The UPGrade function is used to apply the contents of IBM-distributed upgrade libraries to an 
operational system and updates the system history file accordingly, or produces a new history 
file. 

Restrictions: The UPGrade function can only be performed when MSHP is executed in the back- 
ground partition. 

Foreground partitions must be inactive if a library space problem is being resolved by means of 
condense and FCOPY runs (see CONCIude below). 



Related Detail Control Statements: 
Mandatory: DEFine 



Optional: REJect 



OLDsystem Specifies that the history information about the PTFs applied by the UPGrade 

function is to be inserted in the operational system's history file. 

NEWsystem Specifies that the whole system history file of the current operational system 

be merged to the MSHP-created auxiliary history file. These merged files, then 
can become the history file of a new (operational) system. 

The auxiliary history file created by MSHP is the restored history file that 
accompanied the upgrade library package, from which MSHP has removed all 
entries relating to PTFs that have to be rejected. 

ALL Specifies that all PTFs contained in the upgrade library are applied to the 

current operational system. Excluded from this application are PTFs that 
don't satisfy the conditions requested by MSHP. The exceptions are listed in 
the MSHP USER.s GUIDE under the same option (keyward operand). 

EXcept Identifies that PTFs for the components named in the exception-list (see below) 

are not to be applied. 

(The EXcept option is used to exclude whole components from preventive 
system service, whereas the REJect detail control statement excludes indi- 
vidual PTFs.) 

Exception-list Specifies the components to be excepted from preventive maintenance. 

exception is a string of 1 1 characters according to the example: 5745-SC-JCL. 

COMPonent Identifies that the components named in the component-list (see below) are to 

be included in the preventive system service. 
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component-list Specifies the components to be included in the preventive system service. 

If specified, only the components named are candidates for preventive system 
service. PTFs for all components not named are rejected. 

A component may be named for preventive system service in this option, even 
though there might not be a PTF for it in the PTF upgrade libraries. 

component is a string of 1 1 characters according to the example: 
5745-SC-JCL. 

IRRevokable Specifies that no backout PTFs will be generated for the PTFs applied during 
preventive system service. 

REVokable Requests backout PTFs to be generated for all PTFs applied. 

The backout PTFs are MSHP jobs with the REVoke function control state- 
ment included. 

If SYS006 is assigned to a tape drive, the backout PTFs are written in blocked 
format to this tape unit. Otherwise, the backout PTFs are written unblocked 
to SYSPCH. 



s and the distribution history file are to be 



FROMTape Specifies that the upgrade libra 

restored. 

The tape containing the upgrade libraries must be mounted on a tape drive 
that is assigned as SYS006. MSHP restores the libraries as defined in the 
DEFine detail control statement; the libraries defined must be of the type 
PRI Vate with the following assignments effective: 
SYS007 for private CLIB 
SYS008 for private RLIB 
SYS009 for private SLIB 

MSHP restores the distribution history file from tape to an auxiliary history 
file. An assignment for the auxiliary history file as SYS002 or as specified in 
the Unit-SYSnnn parameter of the DEFine statement must be effective in any 

From the auxiliary history file all PTF entries are removed for PTFs to be 
rejected. For the copying, assignments for the restored libraries must be effec- 
tive as follows: 
SYSOOO for SLIB 
SYS001 for RLIB 
SYS003 for CLIB 

FROMDisk When this option is coded, MSHP assumes that the distribution PTF upgrade 

libraries and the corresponding history file have been restored previously. 
DEFine detail control statements are now needed to make known to MSHP 
where the restored libraries and AUXiliary history file are. (The DEFines for 
the libraries must not specify a directory size.) 

Assignments for the restored libraries and the auxiliary history file must be 
effective as follows: 
SYSOOO for SLIB 
SYS001 for RLIB 
SYS003 for CLIB 

For the auxiliary history file, the assignment must be SYS002, or as specified 
in the Unit=SYSnnn parameter of the DEFine statement. 

WHOLEjob Specifies that restoring the libraries and applying the PTFs is to be done in one 

continuous job. 

CONCIude Specifies that MSHP checks the target libraries for sufficient space before 

merging the PTF phases, modules, and/or macros from the restored PTF up- 
grade libraries, or before link-editing. 

NODLIBbuild Suppresses the DLIBbuild option (see below). 

DLIBbuild Specifies that two PTF application libraries (which are interdependent through 

corequisite PTFs) are to be merged. 

This function makes application of PTFs acceptable, even if their corequisites 
are not yet installed, or are not on the same upgrade library. (A warning 
message is issued, nevertheless.) The libraries involved in applying the PTF are 
verified to be private libraries. Backout PTFs for such PTFs are generated 
with the DLIBbuild option in the REVoke statement. 
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Specifies that all components upgraded with PTFs from the PTF upgrade 
libraries are to be linkedited provided at least one PTF for such a component 
was applied (when building the PTF upgrade libraries) with linkediting 
suppressed (specifying NOLink in APPLY, or not specifying APply in SELect 
or ACCept). For additional and further detail information refer to MSHP 
USER'S GUIDE. 



Detail 

Control 

Statements 



Keyword Operands 



-PHAses = phase-name- 



list — ' ' — M( 



lODules = modul 



— CSect = csect-number- 



-EXPand = size-increment - 



— MACros = macro-name-list - 



-SUBlib = sublibrary-qualifier- 



APPLICATION/EXPLANATION 

The AFFects statement identifies which phases, modules, and/or macros are affected by a PTF, 
or local fix; or which of the replacement modules are for a feature. 

PHAses Identifies that phase(s) as specified in phase-name-list (see below) are affected. 

phase-name-list Specifies the affected phase{s). 

Restrictions: If the AFFects statement is used for archiving a local fix and 
the fix information, list may not be specified, but only the name of the phase 
to be modified. 



e to 8 alphameric characters: 



phase-name is a string of o 
0-9, A-Z, #, S, and @ 

MODules Identifies that modules (members of the relocatable library) as specified in 

module-name-list (see below) are affected. 

module-name-list Specifies the affected module(s). (Restrictions and character string same as for 
phase-name-list above) 

LIOCS Identifies that a LIOCS module is affected by a PTF. 

Note that only the macro to generate the module is distributed in the PTF, 
but not the affected module itself. 

CSect Identifies that an alteration applies to the CSECT specified in CSect-number 

(see below). 

Default: If not specified, CSect = 001 is assumed; that is, the first CSECT. 

Restrictions: CSect must only be specified when archiving a local fix. 

csect-number Specifies the CSECT number to which the alteration applies. 

csect-number has one to three digits. If less than three digits are specified, the 
number is padded with leading zeros. 
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EXPand Identifies that the specified CSECT of the named module is to be made larger, 

as specified in size-increment (see below), so that fix code can be added at the 
end of the CSECT. 

Restrictions: EXPand must only be specified when archiving a local fix. 

size-increment Specifies the number of bytes by which the CSECT is to be increased. 

size-increment is a number of one to six digits. 

MACros Identifies that macros (members of the source statement library) as specified 

in macro-name-list (see below) are affected. 

macro-name-list Specifies the affected macro(s). 

Restrictions: When the AFFects statement is used for archiving a local fix and 
the fix information, list must not be specified, but only the name of the macro 
to be modified. 

macro-name is string of one to eight alphameric characters: 

0-9, A-Z, #, $. @; 

the first characters must be alphabetic: 

A-Z, #, $, or @. 

SUBlib Identifies that a specific sublibrary of the source statement library contains 

the affected macro (s). 



Default: If not specified, sublibrary E is assumed. 



sublibrary-qualifie 



Specifies the sublibrary of the affected macro, 
sublibrary-qualifier is one alphabetic character: A-Z. 
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Keyword Operands 



APPLICATION/EXPLANATION 

The ALter statement identifies the modifications that are to be made to a phase (core image 
library member) or module (relocatable library member). Modification includes verification for 
core image library members. 

address Specifies the address where the new-text is to begin to replace the old-text. 

address is a string of one to six hexadecimal digits. 

old-text Specifies the text that is to be replaced. 

The text in the phase or module at the specified address is verified to be 
identical with the old text; replacement by new text takes only place if 
identical. 

Restrictions: old-text must be specified if modifying a phase, but not when 
modifying a module. 

Old text can be of any of the three formats described in the MSHP USER's 
GUIDE under the description for the ALter Detail Control Statement. 

new-text Specifies the text that is to replace the text at the specified address. 

new-text can consist of any of the three formats as described for old-text in 
the MSHP USER'S GUIDE. 
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Keyword Operands 



-CLib- 
-RLib- 
-SLib- 
-PLib- 



- EXTent = start-track : tracks- 



^ 



Dl Rectory = directory-size - 



-IDentifier = 'data-set-name'- 



• • Auxiliary •• 

— SYStem 

— DLIBbuild — 



-EXTent = start-track : tracks - 



-SPIit = split-track- 



-Unit = SYSnnn- 



' IDentifier = 'data-set-name'- 

-Labelarea EXTent = blocks— 



APPLICATION/EXPLANATION 

The DEFine statement creates label/extent definitions for libraries or history files in the user 
label area of the partition in which MSHP is executed. Further, it detemines the library alloca- 
tion for MSHP functions such as INSTall, RESTore, and Dtape, which involve restoring libraries 
from tape to disk. DEFine Labelarea is used to specify how many FBA blocks are to be allo- 
cated for the System Label Area when installing a system. 

The following describes the keyword operands of the DEFine statement. 

CLib Identifies that the label definition and/or allocation has to be made for a core 

image library. A label definition is made only if PRIVate is specified as well; 
in this case, the file name used is: IJSYSCL. 

RLib Identifies that the label definition and/or allocation has to be made for a 

relocatable library. A label definition is made only if PRIVate is specified as 
well; in this case, the file name used is: IJSYSRL. 

SLib Identifies that the label definition and/or allocation has to be made for a 

source statement library. A label definition is made only if PRIVate is speci- 
fied as well; in this case, the file name used is: IJSYSSL. 

PLib Identifies that a procedure library is to be restored and that its allocations are 

as specified in EXTent (see below). 



I 



PLib may be specified only in relation to function 



Restrictions: DEFin 
control statement 

• INSTall 

Identifies that the library is to be restored as system library. 

Restrictions: DEFine SYStem may be specified only in relation to function 
control statements: 

• INSTall 

• RESTore Dtape 

Identifies that (if applicable) the library is to be restored as private library. 
Further, a label definition entry is made in the partition label area. 

Restrictions: PRIVate may not be specified with PLib. 

Identifies that, when restoring, space should be left for an (empty) library. 

Restrictions: PLACEholder must not be specified with CLib. 

DEFine PLACEholder may be specified only in relation to the function con- 
trol statement: 
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Default for SYStem/PRI Vate/PLACEholder. If neither SYStem nor PRIVate, 
nor PLACEholder is specified, the default taken depends on which function 
control statement the DEFINE statement is detail control statement to. 

The default is: 

SYStem for INSTall 
PRIVate for UPGrade 

EXTent Identifies that extent information (if a label definition entry is made), and the 

library allocation (when restoring is involved) is to be derived from the speci- 
fied values in start-track : tracks (see below). 

start-track For CKD devices, specifies the track number relative to zero, where a private 

library is to begin; the library must begin on a cylinder boundary, except in 
the case of a private core image library. 

For FBA devices, designates the number of the first FBA block of a private 
library. 

Restrictions: start-track must be specified for libraries or type PRIVate; it 
must not be specified for libraries of type SYStem. 

start-track is any decimal number not exceeding 2.147.483.647. 

tracks Specifies, for a private library, what the extent is to be in the label definition; 

and for any type of library (SYStem or PRIVate), how many tracks/blocks 
are to be allocated when restoring. 

tracks is any decimal number not exceeding 2.147.483.647. 

For CKD devices, the number specified is in number of tracks and may be any 
integral number of cylinders. If less than one cylinder is specified, the mini- 
mum allocated is one cylinder; if an odd number of tracks is specified, an 
integral number of cylinders is allocated. 

Dl Rectory Identifies that space, as specified in directory-size (see below), is to be allo- 

cated for the library directory. 

directory-size For CKD devices, specifies how many tracks must be allocated for the library 
directory; for FBA devices, how many FBA blocks, 
directory-size is a decimal number not exceeding 2.147.483.647. 

IDentifier Idenfies that the libray identifier given in dataset-name (see below) is to be 

entered in the VTOC. 

Dataset-name Specifies the library identification that is to be entered in the VTOC. 

dataset-name is a string, enclosed in quotes, of one to 44 alphameric charac- 
ters. 

Defaults: If dataset-name is not specified, MSHP takes the following defaults: 

• For CLib PRIVate: 'DOS.SYSCLB.FILE' 

• For RLib PRIVate : 'DOS.SYSRLB.FILE' 

• For SLib PRIVate: 'DOS.SYSSLB.FILE' 

If DEFine SYStem has been specified and dataset-name is omitted, MSHP takes 
the default: DOS.SYSRES.FILE 

Restriction: If DEFine SYStem RLib/SLib/PLib and dataset-name has been 
specified, the dataset-name specification is ignored. If CLib has been specified, 
the VTOC entry for the CLib is that of the SYSRES file. 

History Identifies that a label definition is to be made for a history file. 

Auxiliary Identifies that the entry in the partition's user label area for the history file is 

to be made under the file-name: 
IJSYS02 

SYStem Identifies that the entry in the partition's user label area for the history file is 

to be made under the file-name: 
IJSYSHP 

DLIBbuild Identifies that entries for the file-names IJSYSHF and IJSYS02 are to be made 

in the partition's user label area. 

Both files have the same extent and identifier as specified or defaulted in 
EXTent and IDentifier. 
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EXTent Identifies that extent information and the library allocation is to be derived 

from the specified values in start-track : tracks. 

start-track For CKD devices, specifies with which track relative to zero the extent for the 

history file is to begin; for FBA devices with which FBA block number. 

start -track is any decimal number not exceeding 2,147.483.647. 

tracks Specifies, for the history file, the size of the extent. 

tracks is a decimal number not exceeding 2.147.483.647. For CKD devices, 
the number specified is in number of tracks; for FBA devices, the number 
means FBA blocks. 

SPlit Identifies that the history file is to be maintained as a split-cylinder file; identi- 

fies the value given in split-track as the last track to be allocated to the file. 

Restrictions: SPlit must not be specified for a history file on FBA devices. 

split-track Specifies which track is the last one in each cylinder to be allocated to the 

history file defined. (The first cylinder occupied by the file ist the one in which 
the "start -track" lies, and the last cylinder is determined by the number of 
tracks specified.) 

split-track is a decimal integer not exceeding 19. 

Unit Identifies that a history file is to reside on the logical unit (other than SYSREC) 

as specified in SYSnnn. 

Restrictions: Specification of Unit does not allow for maintaining the system's 
parameter history file on a logical unit other than SYSREC. 

SYSnnn Specifies the logical unit on which the defined history file is to reside, and 

assigns the unit to a physical device (CKD or FBA). 

SYS is followed immediately by three digits (for nnn) representing the physical 
device address. 

Default: If not specified, MSHP takes the following defaults: 
For a SYStem history file: SYSREC 
For a Auxiliary history file: SYS002 
For a DLIBbuiid history file: SYS002 

IDentifier Identifies that the history identifier given in dataset-name is to be entered in the 

VTOC. 

'dataset-name' Specifies the history file identification that is to be entered in the VTOC. 

dataset-name is a string, enclosed in quotes, of one to 44 alphameric characters. 

Defaults: If dataset-name is not specified, MSHP takes the following defaults: 
For History Auxiliary: 'DOS.AUXILIARY.HISTGRY.FILE' 
For History SYStem: 'DOS.SYSTEM.HISTORY.FILE' 
For History DLIBbuiid: 'DOS.DLIB. HISTORY. FILE' 

Restriction: If you use IBM-supplied standard labels or if your own standard 
label set contains DLBL and EXTENT for IJSYSHF, do not use DEFINE 
HISTORY SYSTEM in any MSHP job accessing the system history file. 

Labelarea Identifies that a labeiarea is to be allocated when installing a system on a FBA 

device. 

Restrictions: DEFine Labelarea may only be specified in conjunction with the 
function control statement INSTall. 

Default: If omitted, defaults apply as assumed by the RESTORE utility pro- 
gram. 

EXTent Identifies that the size of the labelarea that will be allocated is to be derived 

from the value given in blocks (see below). 

blocks Specifies how many FBA blocks are to be allocated for the label area when in- 

stalling a system. 

blocks is a decimal number of minimum 12 and not exceeding 2.147.483.647. 
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The DELETE statement indicates the lines to b 
when archiving a local fix. 



I deleted from a source statement library member 



Specifies the line-number, in columns 73 through 78 in the de-edited (E-served) 
deck, where deletion begins. The from-line is the first line to be deleted. 

from-line is an integer of one to six digits. 

Default: If omitted, 'from-line' is assumed to be equal to 'to-line'. This means, 
that only the line designated by to-line (see below) is deleted. 

Identifies the last line of the lines to be deleted. 

to-lin( 



s an integer of one to six digits. 



Restrictions: to-line must numerically be equal to or greater than the value 
given in from-line. 



Detail 
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Keyword Operands 



APPLICATION/EXPLANATION 

The INSERT statement identifies where, it 
be made when archiving a local fix. 



3 source statement library member, additions are to 



Specifies the line number in the de-edited (E-served) deck in columns 73 
through 78, after which the source input (following the INsert statement up 
to the next /S ) is to be inserted. 

after-line is an integer of one to six digits. 



Detail 
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Keyword Operands 



- ptf -number - 



• •••|RRevokable«»»« 
I REVokable ' 



• •••NODLlBbuild»«« 
I DLIBbuild ' 



;^:! c 



COMment = 'comment'- 



APPLICATION/EXPLANATION 

The PTF statement indicates (to SELect) which PTFs are to be selected from the cumulative PTF 
file. One PTF statement is required for each PTF that is to be selected; they need not to be in 
any specific sequence. 

ptf-numb er Identifies the PTF that is to be selected from the cumulative PTF file. 

ptf -number is a string of 6 or 7 characters, the first one or two are alphabetic, 

the remaining five are digits. 

For example: 

N12345 (Nnnnnn is used for "old" format PTFs) 

UD12345 (UDnnnnn is used for "new" format PTFs) 

1 RRevokable Specifies that, when applying the selected PTF, no backout PTF is to be 
generated. That is, the PTF cannot be revoked. 

Restrictions: See Hierarchy of Irrevokable/Revokable, below. 
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REVokable Specifies that, when applying the selected PTF, a backout PTF is to be gene- 

rated. That is, the PTF can be revoked. 

Restrictions: See "Hierarchy of Irrevokable/Revokable", below. REVokable 
cannot be specified with the DLIBbuild option specified. 

NODLIBbuild If explicitly specified, suppresses DLIBbuild specification in the SELect or 
APply statement for the selected PTF. 

DLIBbuild If specified, has the same effect as if specified in the APply statement or the 

selected PTF. it overrides any defaulted or explicitly specified NODLIBbuild in 
the APply or SELect statement. For the function of DLIBbuild in APply, see 
the APPLY statement. 

Restrictions: DLIBbuild and REVokable are mutually exclusive options. 
NOLINK If specified, has the same effect as if specified in the APPLY statement of the 

selected PTF; even if in the SELECT statement no indication is given that 
Linkeditsare to be suppressed (the option APply being coded). For the func- 
tions of NOLINK, see NOLINK in the APPLY statement. 

COMment Identifies that the comment as specified in comment (see below) is to be 

inserted in the history file. 

'comment' Specifies that a comment relating to the selected PTF has to be inserted in the 

history file when the PTF is applied. 

comment is a string, enclosed in quotes, of one to 57 characters (not counting 
the quotes). 

Hierarchy of Irrevokable/Revokable 

Revokability for a PTF may be specified in the SELect statement, the APply statement and in 
the PTF statement. The following hierarchy holds: 

An explicit specification of IRRevokable or REVokable in the PTF statement overrides any other 
revokability specification (explicit or defaulted). 

If irrevokable/revokable is not explicitly specified in the PTF statement, then an explicit specifi- 
cation in the SELect statement becomes the controlling one. 

If irrevokable/revokable is not explicitly specified in the PTF or int the SELect statement, then 
the revokability in the APply statement (explicit or defaulted) becomes effective. 

Release 34 format PTFs are always IRRevokable, unless REVokable is specified in the PTF or 
the SELect statement. 



I 
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-PTFs = ptf-number-list- 



APPLICATION/EXPLANATION 

The REJect statement indicates which PTFs are explicitly to be excluded if upgrading a 
system. 

Restrictions: The total number of PTFs that are to be rejected per UPGRADE (and specified in 
one or more REJECT statements) together with the total number of components that are to be 
excepted must not exceed 113. 

component Specifies the component, for which PTFs (specified in PTFs = ptf-number-list, 

see below) are to be rejected. 

component is a string of 1 1 characters according to the example: 5745-SC-JCL. 

PTFs Identifies that PTFs as specified in ptf-number (see below) are to be excluded 

from application. 

ptf-number-list Specifies the numbers of the PTFs to be excluded. 

ptf-number is a string of 6 or 7 characters, the first one or two are alphabetic, 

the remaining five are digits. 

For example: 

N 12345 

UD12345 
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-from-line : to-line- 



APPLICATION/EXPLANATION 

The REPIace statement is used, when archiving a local fix. The statement defines where replace- 
ment of lines in a source statement library member must begin and end, and initiates the replac- 
ing of the source text. (The replacing data are to be terminated by an input line containing /$ in 
columns 1 and 2.) 

from-line Specifies in the d-edited (E-served) deck the line-number in columns 73 

through 78, which is the first line to be deleted and to be replaced. 

from-line is an integer of one to six digits. If less than six digits are coded, lead- 
ing zeros are supplied. 

to-line Specifies that beginning with "from-line", all lines in the de-edited (E-served) 

deck are to be deleted up to and including to-line. to-line is the line-number 
contained in columns 73 through 78 of the data to be modified. Any input 
lines contained between the REPIace statement and the next /$ line, are in- 
serted. 

to-line is an integer of one to six digits. If less than six digits are coded, leading 
zeros are supplied. 



This program allows you to make changes to programs cataloged in a system or private core 
image library. It provides a printout of the changes on SYSLST. This printout should be kept on 
the installation to keep track of the changes made. 

SYSTEM REQUIREMENTS 

PDZAP can be executed in any partition. Since PDZAP accesses a core image library, other pro- 
grams running currently should not use the phases PDZAP is operating on the same library. 
SYSLOG must be assigned to the operator console. When card input is used, SYSIPT must be 
assigned to a card reader (hopper 1 on 5425/2560). SYSLST should be assigned to a printer. 

EXECUTING PDZAP 

The PDZAP program can be executed from the operator console or from a card reader. 

HOW TO EXECUTE PDZAP FROM THE OPERATOR CONSOLE 

Teh following is an example in which the program PROG is used as a phase to be modified. 

Call in the program 
// EXEC PDZAP 

The system will respond: 

4C86I PDZAP EXECUTION BEGINS 

4C99A Enter your name. Reply to this message by typing your name. 

4C85A ENTER PHASENAME (XCIL= xxxxxxxx) 

Reply to this message in one of the following ways: 

a) if PROG is in the system core image library enter SCI L=PROG, or simply PROG, as SCI L is 
the default. 

b) if PROG is in the private core image library enter PCIL=PROG. 

When the phase is found, the following messages are issued: 

4C87I LOAD ADDRESS=xxxxxx 

4C88D ADDRESS XXXXXX, OFFSET+XXXXXX,SCAN=XX..XX,REF=XXXXXX 

Reply to this message in one of the following ways: 

option 1 specify the hexadecimal address of the data you want displayed: 08072A 

option 2 specify the offset to the reference point of the data you want displayed 

(the initial reference point is the load address): +6D4 
option 3 specify a character string to be searched: SCAN='LABPROG' 
option 4 specify a hexadecimal string to be searched: SCAN=D3C1C2D7D9D6C7 
option 5 set a reference point: REF=08071C. 

If an address is invalid or a string cannot be found, an error message will be issued. 

To options 3 and 4 the system will first respond with: 
4C941 SCAN ADDRESS xxxxxx 

Options 1-4 will result in the display of up to 16 bytes of data in the format 

4C89D 

XXXX..XX cccc.cc 

where xxxx..xx is the hexadecimal representation and cccc.cc is the corresponding character 
representation. 

The data printed is contained in a single library block. If less than 16 bytes are displayed, it is 
either the end of the program or the end of the library block. 

If only a display is wanted, press END/ENTER. 

To modify the displayed data, type in replacement data for the number of bytes to be changed. 

For instance, if the data displayed is: 

4C89D 

05B01210746410000014790B42807F6 6 

to change the first four bytes to NOP, type in: 
07000700 

The system will respond with message 4C88A again and you can use one of the five options 
mentioned above to display or modify another portion of the same phase, or to set another re- 
ference point. 
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PDZAP {. . . Cont'd) 

HOW TO EXECUTE PDZAP FROM THE OPERATOR CONSOLE ( Cont'd) 

If you are finished with this phase, but want to access another phase, use 

• option 6 terminate processing with this phase by typing END PHASE 

Now the program repeats message 4C85A, which allows you to specify the name of another 
phase. 

If you want to terminate the execution of PDZAP, use 

• option 7 end PDZAP operation by typing: END 

HOW TO EXECUTE PDZAP FROM A CARD READER 

Executing PDZAP from SYSIPT is the same as from SYSLOG, with the following exceptions: 
// UPSI 1 must be specified to indicate card input 
data must be verified before it can be changed. 

Example: 

// UPSI 1 indicate card input 

// EXEC PDZAP call the program 

NAME=your name specify your name 

SCI L=PROG specify the phase to be accessed 

+6D4 specifies the position of the data to be displayed (option 2) 

VER=05B0, 1211 or "1 specifies the data to be verified; if the data is 

VER=05B0121 1 / not found, no update will take place 

REP=07000700 or | specifies the data which is to replace the date 

REP=0700,0700 Ijust verified 

END I terminates the run 

The format of the VER and REP data can be: 

• a hexadecimal string (full bytes, or an even number of digits) 

• a set of 2-byte entries, separated by commas 

• a character string, preceded by a quote (VER='LABPROG). 

OUTPUT OF PDZAP ON SYSLST 

On SYSLST, which must be a line printer, the program prints the following in the sequence as 

shown: 

PDZAP. 

Date and time of the change. 

Your name as specified. 

Name of the phase that has been changed. 

Load address of that phase. 

Address of the changed data. 

Old data in hexadecimal notation. 

New data in hexadecimal notation. 

Note: Full details about possible responses to PDZAP messages are given in DOS/VSE messages. 



DOSVSDMP AND STAND-ALONE DUMP 

DOSVSDMP, A PROGRAM OF DOS/VSE, CAN BE USED TO CREATE A STAND-ALONE 
DUMP IN CARDS, ON A DISKETTE, ON MAGNETIC TAPE, OR ON DISK. THE PROGRAM 
CAN ALSO BE USED TO PRINT THE OUTPUT OF: 

- A STAND-ALONE DUMP. 

- A DUMP TAKEN IN RESPONSE TO A DUMP COMMAND IF THE OUTPUT WAS WRITTEN 
ONTO MAGNETIC TAPE OR DISK. 

- AN EXECUTION OF THE SDAID PROGRAM IF ITS OUTPUT WAS WRITTEN ONTO 
MAGNETIC TAPE. 

1. RECORD ANY ERROR OR STATUS INDICATORS ON THE SYSTEM CONSOLE. 

2. USING ALTER/DISPLAY, RECORD THE CURRENT PSW, GENERAL REGISTERS, AND 
FLOATING POINT REGISTERS. 

3. PERFORM THE STORE STATUS (43XX PROCESSORS SAVE MACHINE) PROCEDURE 
FOR YOUR SYSTEM. 

4. iPL YOUR DUMP PROGRAM FROM CARDREADER, TAPE, DISKETTE, OR DISK. 

5. IF MESSAGES 4C43I DOSVS DMP COMPETE OOOOXX TRACKS USED, RESTART 
DOS/VSE AND PREPARE TO PRINT THE DUMP AS SOON AS THE SYSTEM HAS BEEN 
RESTARTED. 

CREATING THE STAND-ALONE DUMP PROGRAM 

THE PROGRAM, ONCE IT RECEIVED CONTROL, PROMTS YOU FOR FURTHER CONTROL 
INFORMATION, AND YOU SELECT THE DESIRED OPTION BY AN APPROPRIATE RE- 
SPONSE TO THE PROGRAM'S PROMT AS SHOWN. 

PROMT MESSAGE 

XX 4C50D SELECT YOUR OPTION BY THE CORRESPONDING NUMBER 
1. CREATE DOSDMPF 2 PRINT DUMP 3 PRINT SDAID TAPE 

4 PRINT FILE 5 INFORMATION 6 EOJ (DEFAULT) 

7 CREATE DOSDMPG 8 CLR DOSDMPF 9 CLR DOSDMPG 

EXAMPLE FOR JOB CONTROL 
TAPE DUMP: 

1. SELECT A NON-LABELED TAPE TO BE USED AS THE DUMP VOLUME. 

2. EXECUTE DOSVSDMP: 
// JOB 

//ASSGNSYS006,280 
// EXEC DOSVSDMP 
/& 

3. WHEN MESSAGE 4C50D IS ISSUED, REPLY: 1 
(1 CREATE DOSDUMPF) (6 EOJ DEFAULT) 

4. MESSAGE 4C79 I INDICATES THAT CREATION OF THE DUMP PROGRAM TAPE 
IS COMPLETED. 

REFER TO DOS/VSE MESSAGES FOR AN EXPLANATION OF THE ABOVE MESSAGES. 



1. SELECT A DISK PACK TO BE USED AS THE DUMP VOLUME. 

NOTE THAT THE IPL TEXT ON THE PACK WILL BE REPLACED BY THE DUMP IPL 
TEXT. THE SELECTED PACK CANNOT BE A SYSTEM RESIDENCE VOLUME. 

2. BEFORE YOU CAN EXECUTE DOSVSDMP, THE FILE WHICH IS TO HOLD THE DUMP 
OUTPUT MUST BE ALLOCATED ON THE SELECTED VOLUME. THIS FILE MUST BE 
NAMED DOSDMPF, AND BEGIN AND END ON A CYLINDER BOUNDARY. THE SIZE 
OF THE FILE IS CALCULATED USING THE FOLLOWING FORMULA: 

FOR CKD DEVICE: 
N = 2-i-(V-(-R)/T 

FOR AN FBA DEVICE USING BLOCKS OF 512 BYTES IN LENGTH: 
N = 4(7 + (V-HR)(1 + 1/256)) 
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DOSVSDMP AND STAND-ALONE DUMP ( Cont'd) 

EXAMPLE FOR JOB CONTROL (. . . . Cont'd) 



N = IS THE NUMBER OF REQUIRED TRACKS FOR A CKD DEVICE AND THE NUMBER 

OF BLOCKS FOR AN FBA DEVICE. 
V = IS THE NUMBER OF PAGES IN THE VIRTUAL ADDRESS AREA. 
R = IS THE NUMBER OF PAGES IN THE REAL ADDRESS AREA. 

T = 3 FOR A VOLUME ON A 2314 (2319) OR 3340 
6 FOR A VOLUME ON A 3330 
8 FOR A VOLUME ON A 3350 

THE RESULT N MUST BE ROUNDED TO THE NEXT HIGHER NUMBER OF TRACKS 
EQUIVALENT TO THE NEXT WHOLE NUMBER OF CYLINDERS. 

EXAMPLE: 

3. EXECUTE DOSVSDMP 
//JOB 
//ASSGNSYS006, 132 

// DLBL DOSDMPF, 'FILENAME' 

// EXTENT SYS006, BALANCE OF EXTENT INFORMATION 

// EXEC DOSVSDMP 

/& 

4. WHEN MESSAGE 4C50D IS ISSUED, REPLY: 1,6 
(1 CREATE DOSMPF) (6 EOJ DEFAULT) 

5. MESSAGE 4C79 I INDICATES THAT CREATION OF THE DUMP PROGRAM DISK IS 
COMPLETED. 

REFER TO DOS/VSE MESSAGES FOR AN EXPLANATION OF THE ABOVE MESSAGES. 

DISKETTE OR IN CARDS 

ASSIGN SYS006 TO A DISKETTE OR A CARD UNIT. THIS CAUSES PROGRAM DOSVS- 
DMP TO PROMPT YOU FOR THE DESIRED OUTPUT MODE AS SHOWN. 

PROMT MESSAGE 

XX4C51D SELECT YOUR OPTION BY NUMBER 

1 cuu PRINTER ADDRESS (DEFAULT IS 1=00E) 

2 INTERRUPT 3 EOJ 

EXAMPLE JOB CONTROL: DISKETTE AND CARDS 

DISKETTE DUMP: 

1. EXECUTE DOSVSDMP: 
//JOB 

// ASSGN SYS006, 04 F 
// DLBL DOSDMPF, 'DATA', 77/001, DU 
// EXTENT SYS006 
// EXEC DOSVSDMP 
/& 

CARD DUMP: 

1. EXECUTE DOSVSDMP: 
//JOB 

// ASSGN SYS006, OOD 
// EXEC DOSVSDMP 
/& 

EXECUTING THE STAND-ALONE DUMP PROGRAM 

THE PROGRAM IS ACTIVATED VIA AN IPL OF THE TAPE, DISK, DISKETTE OR CARD- 
READER CONTAINING THE DUMP PROGRAM. THE IPL PROCEDURE LOADS THE 
PROGRAM INTO AND OVERLAYS STORAGE LOCATIONS X'AOO' TO X'AFF'. ONCE 
LOADED, THE PROGRAM PROCEEDS TO WRITE OUT STORAGE IN VIRTUAL PAGE 
ORDER. FOLLOWING THE VIRTUAL STORAGE DUMP, OR AS A RESULT OF AN ERROR 
IN ATTEMPTING TO DUMP VIRTUAL STORAGE, A DUMP OF REAL STORAGE IN REAL 
PAGE ORDER IS TAKEN. UPON COMPLETION OF THE DUMP MESSAGE DOSVSDMP 
COMPLETE IS ISSUED AND THE SYSTEM IS PLACED IN THE WAIT STATE WITH A 
COMPLETION CODE IN BITS 48 TO 63 OF THE CURRENT PSW. 



DOSVSDMP AND STAND-ALONE DUMP ( Cont'd) 

PRINTING THE STAND-ALONE DUMP OUTPUT 

FOR PRINTING THE STAND-ALONE DUMP OUTPUT, THE PROGRAM REQUIRES AT 
LEAST 40 K OF STORAGE, NOT INCLUDING THE SIZE OF THE SUPERVISOR. 

EXAMPLE FOR JOB CONTROL: PRINTING FROM DISK 

1. EXECUTE DOSVSDMP: 
//JOB 

// ASSGN SYS006,DEVICE 

// DLBL DOSDMPF, 'FILENAME' 

// EXTENT SYS006, BALANCE OF EXTENT INFORMATION 

// EXEC DOSVSDMP 

/& 

2. WHEN MESSAGE XX4C50D IS ISSUED, REPLY: 2 
(2 PRINT DUMP) 

3. WHEN MESSAGE XX4C52D IS ISSUED, REPLY: 
SELECT YOUR DUMP(S) BY NUMBER. 

PROMPT MESSAGE 

XX 4C50D SELECT YOUR OPTION BY THE CORRESPONDING NUMBER 

1 CREATE DOSDMPF 2 PRINT DUMP 3 PRINT SDAID TAPE 

4 PRINT FILE 5 INFORMATION 6 EOJ (DEFAULT) 
7 CREATE DOSDMPG 8 CLR DOSDMPF 9 CLR DOSDMPG 

2 < OPERATOR'S RESPONSE 

PROMPT MESSAGE 

XX 4C52D SELECT YOUR DUMP(S) BY NUMBER 

1 SUPVR 2 VIRT(DEFLT) 3 REAL 4 FORMATTED 

5 SVA 6BG0RF1ETC 7 ADDR-ADDR 8 END SELECT 
9 EOJ EXAMPLE: 5,6 BG,6 F1,7 0-37FF,8 

1, 6 F2, 4, 8 < OPERATOR'S RESPONSE 

t ft MF YOU SELECT MORE THAN ONE OPTION, THESE 

I L-l OPTIONS MUST BE SEPARATED FROM EACH OTHER BY 

I A COMMA WITH NO PRECEDING BLANK. 

BRIEF EXPLANATION OF POSSIBLE DUMP OPTIONS: 

1 — PRINT THE CONTENTS OF THE SUPERVISOR. 

2 — PRINT THE CONTENTS OF ALL OF VIRTUAL STORAGE (THIS IS THE DEFAULT 

IF NO DUMP OUTPUT OPTIONS ARE SPECIFIED/ THAT IS, IF YOU RESPOND BY 
SIMPLY PRESSING END/ENTER. 
3 — PRINT THE CONTENTS OF PROCESSOR (REAL) STORAGE (APPLIES ONLY TO 
DOS/VSE IN 370 MODE). 

4 — FORMAT AND PRINT DOS/VSE CONTROL BLOCKS. 

5 — PRINT THE CONTENTS OF THE SVA. 

6 — PRINT THE CONTENTS OF THE SPECIFIED PARTITION(S). 

7 — PRINT THE CONTENTS OF ONE OR MORE (UP TO EIGHT) AREAS OF VIRTUAL 
STORAGE AS DEFINED BY PAIRS OF ADDRESSES SPECIFIED IN RESPONSE IN 
SUCCESSIVE PROGRAM PROMPTS. THESE ADDRESSES MUST BE SPECIFIED IN 
HEXADECIMAL NOTATION. IF YOU SPECIFY, FOR EXAMPLE 

7 2001F-20 300 
THE PROGRAM PRINTS THE CONTENTS OF ONE PAGE OF VIRTUAL STORAGE 
FROM 200 00 to 207FF) BECAUSE PRINTING FOR AN ADDRESS PAIR ALWAYS 
BEGINS AT THE NEXT LOWER 2K BOUNDARY OF THE ADDRESS SPECIFIED 
FIRST AND ENDS WITH THE NEXT HIGHER 2K BOUNDARY OF THE ADDRESS 
SPECIFIED LAST. IF YOU SPECIFY 2K BOUNDARIES, PRINTING STARTS AND 
ENDS ON THE SPECIFIED BOUNDARIES. 

8 — INDICATES TO DOSVSDMP THAT YOU HAVE FINISHED SELECTING DUMP OUT- 
PUT OPTIONS. 

9 — TERMINATE EXECUTION OF DOSVSDMP IMMEDIATELY. 

PROMPTS AND RESPONSES FOR PRINTING FROM TAPE OR DISK. 
FOR DETAILS REFER TO DOS/VSE SERVICEABILITY AIDS AND 
DEBUGGING PROCEDURES. 
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DOC 1-43 



INDEX! Cont'd) 

S ( Cont'd) 

Service functions, librarian 11-25 to 11-27 
SET 

ipl command 11-03 

job control command 11-15 
SETDF command 11-15 
SETIVIOD command 11-15 
SETPRT command 11-16 
Size command 11-16 
Shared virtual area (see SVA) 
Storage IVIanagement control biocl< (SMCB) IV-10 
SSERV program, functions 11-26, 11-27 
START command 11-16 
STDTOP command 11-16 to 11-18 
STOP command 11-18 
Storage assignment, permanent 1-14 
Supervisor call codes IV-02 
Supervisor macros 11-36 to 11-41 
Supervisor storage allocation IV-01 
SUPVR macro, supervisor 11-36 
SVA (shared virtual area), layout of IV-91 
SYSCOM (system communication region) iV-11 
System task blocks IV-27 



Tape standard labels 

file(ASCIl) 111-05, 111-06 
file (EBCDIC) 111-03,111-04 
volume (ASCII) 111-02 
volume (EBCDIC) 111-01 

Task interrupt key (see TIK) 

Task timer option table IV-63 

TCB (translation control block) IV-79 

TIK (task interrupt key) IV-25 

TLB L statement 11-18 

TPBAL command 11-19 

Track hold table IV-40 

Translation control block (see TCB) 

TXT card, format 11-44 

U 

UCS command 11-19 
UNPATCH command 11-19 
Update, source statement library 1 1-24 
UPSI statement 11-19 



Virtual to real address, conversion I V-84 

VOL statement 11-19 

Volume labels, standard 

dasd (see dasd standard labels) 
tape (see tape standard labels) 

VSTAB macro, supervisor 11-39 

VTAM address vector table I V-94 

W 



XECB table iV-47 
XTE NT statement 11-11 



Z 

ZONE statement 11-20 
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This sheet is for comments and suggestions about this manual. We would appreciate ^our 
views, favorable or unfavorable, in order to aid us in improving this publication. This form 
will be sent directly to the author's department. Please include your name and address if 
you wish a reply. Contact your IBM branch office for answers to technical questions about 
the system or when requesting additional publications. Thank you. 
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